关于excel vba 的Worksheet_Change事件

2025年01月07日 08:02
有2个网友回答
网友(1):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Row < 11 Then
Target.Offset(, 1) = Val(Target) * 3
End If
End Sub

说明:只要把Worksheet_Change 改为 Worksheet_SelectionChange 即可

网友(2):

1楼,正确,学习了