½Ð±Ð Excel VBA Àx¦s®æ¤ë¾ä³]©w°ÝÃD
- ©«¤l
- 471
- ¥DÃD
- 121
- ºëµØ
- 0
- ¿n¤À
- 579
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN10
- ³nÅ骩¥»
- OFFICE2019
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-4-16
- ³Ì«áµn¿ý
- 2023-1-17
|
¥Î³oÓ§a
§â¸Ì±ªºªí³æ©Mª«¥óÃþ§O¼Ò²Õ©ñ¨ì©p·Qn¥ÎªºÀɮ׸̱
¦A¥Î¥H¤U«ü¥O ¨ú±±¨îÂI¿ïþ¸Ì¸õ¥X¤é¾ä±±¨î¶µ
¿é¥X¦ì¸m=·Æ¹«ÂI¿ï¦ì¸m
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells(1).Address = "$B$6" Then ¤é¾ä.Show 'ÂI¿ïB6«h¸õ¥X¤é¾ä
End Sub
Excel ¤é¾ä´¡¥ó.rar (36.58 KB)
|
|
|
|
|
|
|