excel 解决Mac上的自动筛选功能VBA?

djmepvbi  于 2023-01-06  发布在  Mac
关注(0)|答案(1)|浏览(172)

我正尝试在使用密码保护每个工作表之前,为工作簿的每页上的标题行打开“自动筛选”。我使用的是Microsoft Excel for Mac,如果您熟悉它,它缺少Windows计算机上VBA的完整功能。
我看到了关于这个主题的另一个问题,并尝试实现该代码,但它没有工作。当我录制宏时,它基本上给我下面的前两行代码减去前面的“ws.”。

For Each ws In ThisWorkbook.Worksheets
      
   ws.Range("A1").Select
       
   Selection.AutoFilter
       
   ws.Protect "password"

   
Next ws

但是当我把它添加到我的大宏中时,它给了我1004错误,说 * 对象'range'的方法'select'失败 *

tktrz96b

tktrz96b1#

您可能需要先激活图纸

Dim ws as Excel.Worksheet

For Each ws In ThisWorkbook.Worksheets
   ws.Activate
   ws.Range("A1").Select
   Selection.AutoFilter
   ws.Protect "password"
Next ws

如果您不希望看到工作表在循环中 Flink ,请关闭屏幕更新,然后在循环完成时再次打开。

相关问题