Excel - 宏 - 如何为工作簿中的所有工作表定义事件处理方法
Excel - Macro - how to define an event handling method for all sheets in workbook
我试图在单击单元格时调用宏。这适用于我工作簿中的所有 sheet。但是从搜索中我发现它大多是为特定作品定义的sheet。我想为所有 sheet 制作它。即使将来创建了一个新的 sheet,它也应该具有与其他 sheet 相同的功能。有人能说说如何实现吗?
注意:我用的是excel2010,其他版本的回答对我来说也OK
您应该自定义 SheetSelectionChange
事件,确保您确认您是从工作表对象触发的
Option Explicit
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If TypeName(Sh) = "Worksheet" Then
Dim ws As Worksheet
Set ws = Sh
Dim r As Range
Set r = ws.Range(Target.Address)
With r.Interior
.Color = 65535
End With
End If
End Sub
我试图在单击单元格时调用宏。这适用于我工作簿中的所有 sheet。但是从搜索中我发现它大多是为特定作品定义的sheet。我想为所有 sheet 制作它。即使将来创建了一个新的 sheet,它也应该具有与其他 sheet 相同的功能。有人能说说如何实现吗?
注意:我用的是excel2010,其他版本的回答对我来说也OK
您应该自定义 SheetSelectionChange
事件,确保您确认您是从工作表对象触发的
Option Explicit
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If TypeName(Sh) = "Worksheet" Then
Dim ws As Worksheet
Set ws = Sh
Dim r As Range
Set r = ws.Range(Target.Address)
With r.Interior
.Color = 65535
End With
End If
End Sub