很多人经常会上百度搜索资料，结果发现在百度文库那边可以找到，兴奋了半天却发现下载时要币的，或者登陆上去麻烦。针对这种情况，今天我给大家带来一个破解百度文库下载的方法，其实非常简单，而且不用下载任何软件。好了，废话不多说，直接进入正题。
首先，我们按照平常的习惯，找到自己要的：
Sub Macro1()
sheet1.Protect AllowFiltering:=true
sheet1.unProtect
End Sub
保护时如果选择了最后两项的话，这两句会失效，使用以下四句可能解决
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
False, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:= _
False, AllowFiltering:=True, AllowUsingPivotTables:=True
...
[<] [704] [705] 706 [707] [708] [>]