nnsea 发表于 2020-4-14 19:05:23

撤销工作表保护VBA


Sub pj()
    Dim sht As Worksheet
    For Each sht In Worksheets
      sht.Protect AllowFiltering:=True
      sht.Unprotect
    Next
End Sub
页: [1]
查看完整版本: 撤销工作表保护VBA