宏程序运行问题

tongdaliujj

各位大神，

我在改变单元格的值时运行宏程序，代码如下，但是改变单元格的值没反应，帮忙看看是什么问题，谢谢！

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "b2" Then
Call selct
End If
End Sub

longwin

If Target.Address = "$B$2" Then

lcluck2002

你可以 Msgbox 一下Target.Address的值，应该不是单纯的“b2"

tongdaliujj

longwin 发表于 2024-6-24 08:57
If Target.Address = "$B$2" Then

改过来了，还是没用

ykcbf1100

你上传附件吧，没附件不好调试啊。
改成这样再试一下：
If Target.row=2 and  Target.Column=2 Then

ww87725244

换个事件，selectionchange

木槿花西月锦绣

楼主需要确定你的操作是Change事件，不是SelectionChange，然后代码如下：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
Call selct
End If
End Sub

tongdaliujj

ykcbf1100 发表于 2024-6-24 09:43
你上传附件吧，没附件不好调试啊。
改成这样再试一下：
If Target.row=2 and  Target.Column=2 Then

好了，是我程序出问题了，谢谢