¦³½Ð¸Ñµª! ¦p¦ó»s§@¦¹¤@Äæ¦ì??
- ©«¤l
- 130
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 143
- ÂI¦W
- 0
- §@·~¨t²Î
- Win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- °ª¶¯
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2023-8-3
|
¦^´_ 3# cheng17875
¦pªG¥Î Worksheet_Change ¥hIJµo§ó·sµ{§Ç©O? |
|
|
|
|
|
|
- ©«¤l
- 130
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 143
- ÂI¦W
- 0
- §@·~¨t²Î
- Win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- °ª¶¯
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2023-8-3
|
¦^´_ jackdream
¤£¦n·N«ä! ¤£ª¾¹D«ç¼Ë§Ë°Õ!
¥i§_µ¹¤p¾Ç¥Í§Ú¦h¤@ÂI²³æ¥Õ¸Üªº«ü¥Ü
cheng17875 µoªí©ó 2010-7-26 14:29
½Ð±N¥H¤U¤º®e©ñ¦b sheet ¸Ì±(¤£¬O©ñ¦b¼Ò²Õ¸Ì±)- Private Sub Worksheet_Change(ByVal Target As Range)
- If Not Intersect(Target, Range("A2")) Is Nothing Then 'Y¦³§ó§ï A2 ¤º®e
- If Not Cells(Target.Row, Target.Column) = Empty Then
- Call xxx 'IJµoµ{§Ç (xxx ¥Nªí«ü¶i¦æªÑ²¼§ó·sªº¼Ò²Õ)
- End If
- End If
- End Sub
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 130
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 143
- ÂI¦W
- 0
- §@·~¨t²Î
- Win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- °ª¶¯
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2023-8-3
|
¦^´_ jackdream
§Ú¦³¼g¨ìÀx¦s®æ¤¤ ¦ý¦n¹³¤£¯à°õ¦æ
cheng17875 µoªí©ó 2010-7-27 11:09
±z¦n! ¤Wz»yªk¨Ã¤£¬O¼g¦bÀx¦s®æ¤º,¦Ó¬O sheet ªºvbaµ{¦¡½s¿èµe±.
«Øij¥i¥H¤W¶ÇÀÉ®×,¬Ý¬Ý®æ¦¡¤º®e¬O§_¤@©wn°Ê¥Î vbaµ{¦¡. |
|
|
|
|
|
|
- ©«¤l
- 130
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 143
- ÂI¦W
- 0
- §@·~¨t²Î
- Win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- °ª¶¯
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2023-8-3
|
¦^´_ 9# cheng17875
ªþ¥ó¤º¨ÃµLµ{¦¡½X,¸ê®Æ¨Ó·½¬O eMidst|SW
¦]¦¹n¬Ýì©lÀɮתº¤º®e®æ¦¡,¦A¥Î vlookup ¤§Ãþªº¨ç¼Æ¥h§ä¥X¹ïÀ³È. |
|
|
|
|
|
|