小编Mee*_*dee的帖子

有人知道是否有其他方法可以破解excel中受保护工作表的密码？从那以后我一直在使用这些代码,但现在它似乎不再起作用了.每次运行代码时,文件都会显示"Not Responding".我正在使用MS Office 2013.

Sub PasswordBreaker()
'Breaks worksheet password protection.
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m …

我正在尝试从第2行复制所有带有值的单元格'coz第1行是标题/标题.但是,我的代码似乎选择了具有值的所有单元格.:(
这是我要复制的代码:

Dim myData As Workbook
Set myData = Workbooks.Open("C:\Book2.xlsx")

Worksheets("Sheet1").Range("A2").Select
Worksheets("Sheet1").Range("A2").CurrentRegion.Copy