我正尝试在使用密码保护每个工作表之前,为工作簿的每页上的标题行打开“自动筛选”。我使用的是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'失败 *
1条答案
按热度按时间tktrz96b1#
您可能需要先激活图纸
如果您不希望看到工作表在循环中 Flink ,请关闭屏幕更新,然后在循环完成时再次打开。