录制新宏,停止录制
VB宏,编辑刚刚那个宏,复制下面的内容,执行就破解好了。
Sub jp()
Dim sht As Worksheet
For Each sht In Worksheets
sht.Protect AllowFiltering:=True
sht.Unprotect
Next
End Sub
录制新宏,停止录制
VB宏,编辑刚刚那个宏,复制下面的内容,执行就破解好了。
Sub jp()
Dim sht As Worksheet
For Each sht In Worksheets
sht.Protect AllowFiltering:=True
sht.Unprotect
Next
End Sub