当在工作表中设置了自动筛选,而在保护工作表时没有选择允许“使用自动筛选”,那么自动筛选功能在保护工作表后无法使用。如果需要在不解除工作表保护的情况下能够使用自动筛选,可以用下面的VBA代码:
1.按Alt F11,打开VBA编辑器,在“工程”窗口中选择相应的工作表,在右侧的代码窗口中输入下面的代码:
excel用自定义函数获取某月中指定日期的数量
如果我们要获取某月中指定日期的数量,例如,2009年1月中有几个星期一?用Excel内置的日期时间函数无法解决这个问题。我们可以用自定义函数的方法来解决。按Alt F11打开VBA编辑器,单击菜单“插入→模块”,在右侧的代码窗口中输入自定义函数: Function WeekDaysIn
Sub AutoFilterInProtectedSheet()
With ActiveSheet
.EnableAutoFilter = True
.Protect DrawingObjects:=True, _
contents:=True, Scenarios:=True, _
UserInterfaceOnly:=True
End With
End Sub
2.让受保护的工作表处于活动状态,运行代码。
利用VBA禁用Excel中的F1键
如果在使用Excel过程中习惯使用F2键切换到单元格编辑状态,有时可能会不小心错按了F1键而弹出Excel帮助窗口,特别是对于键盘较小的笔记本这种情况就更容易出现。如果是Excel 2007/2010,Excel帮助窗口会覆盖工作表窗口,显得有些不便。如果要禁用F1键,可以用下面的VBA代码。 在Excel中按快捷键A