BV7BW

¦^´_ 4# singo1232001

If Target.Column = 3 Then
       ¬O³o¸Ì? 3 Then>>>3¬Oc>>4¬Od>>>5¬Oe
³o¬O§Ú²z¸Ñ¤£ª¾¹ï§_
­þ¥þ³¡®æ?©Î¬O«ü©w"e1">>"$E$1"

BV7BW

¦^´_ 4# singo1232001 [/
ÁÂÁÂ'singo1232001 ¤j¤j «ü¾É
    ¥i¥H¹B¥Î
¦ý¦³¤@¨Æ¤£©ú
°²¦p¤£¥Î"c"­n§ï¥ô¦ó¤@Äæ.©Î¬O¥þ³¡©Ò¦³®æ
´N¤£ª¾­n§ï¼g??­þ¸Ì.¬O§_¦³ªí®æ¥i¬d¦ì¸mª©¥»
If Target.Address = "$C$1" Then    ³o¬O"c1"®æ
If Target.Column = 3 Then   ³o¬O¤j¤j"c"¥þ³¡®æ
   ÁÂÁÂ

singo1232001

¦^´_ 3# BV7BW


    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
            If Target.column= 3 Then
               Beep
            End If
End Sub

BV7BW

¦^´_ 2# BV7BW
¦³¸Ñ¶}°ÝÃD
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
            If Target.Address = "$C$1" Then
               Beep
            End If
End Sub
½Ð±Ð ¯à¾ã¦C"c"³£¯àµoÁn¤£ª¾§ï¶i­þ¸Ì

BV7BW

½Ð±Ð ¦U¦ì ¥ý¶i «e½ú

Àx¦s®æµo¥XÁn­µ

1)·Æ¹«ÂI¤J""A1":A65536"¤¤²£¥Í, µo¥X¹ÍÁn"Beep"

2)·Æ¹«ÂI¤J ...
BV7BW µoªí©ó 2021-8-18 17:26

½Ð±Ð ¥ý¶i ¦Ñ®v
³oµ{¦¡¦³»~¥i½Ð ¥ý¶i ¦Ñ®vÀ°¸Ñ´b

Private Sub Worksheet_SelectionChange(ByValTargetAsRange)
            If Target.Address = "$C$1" Then
               Beep
            End If
        End Sub
½sĶ¿ù»~
¨Æ¥óµ{§Çªº«Å§i»P¦P¦W¨Æ¥óªº´y­z¤£¬Û²Å