- ©«¤l
- 450
- ¥DÃD
- 110
- ºëµØ
- 0
- ¿n¤À
- 557
- ÂI¦W
- 138
- §@·~¨t²Î
- Windows 10
- ³nÅ骩¥»
- Office 2019
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-11-7
- ³Ì«áµn¿ý
- 2024-7-9
![2023¦~¥þ¶Ô¼ú³¹ 2023¦~¥þ¶Ô¼ú³¹](images/common/2023.png) ![2022ªê¦~¥þ¶Ô¼ú³¹ 2022ªê¦~¥þ¶Ô¼ú³¹](images/common/hu.gif) ![2021¤û¦~¥þ¶Ô¼ú³¹ 2021¤û¦~¥þ¶Ô¼ú³¹](images/common/niu.gif) ![2020¹«¦~¥þ¶Ô¼ú³¹ 2020¹«¦~¥þ¶Ô¼ú³¹](images/common/shu.gif) ![2019 ½Þ¦~¥þ¶Ô¼ú³¹ 2019 ½Þ¦~¥þ¶Ô¼ú³¹](images/common/zhu.gif) ![2018 ª¯¦~¥þ¶Ô¼ú³¹ 2018 ª¯¦~¥þ¶Ô¼ú³¹](images/common/gou.gif) ![2017 Âû¦~¥þ¶Ô¼ú³¹ 2017 Âû¦~¥þ¶Ô¼ú³¹](images/common/ji.gif) ![½×¾ÂÃÙ§U¾±³¹ ½×¾ÂÃÙ§U¾±³¹](images/common/medal3.gif)
|
½Ð±Ð¦Û°ÊIJ°Êvba»yªk°ÝÃD
Dear ¤j¤j,
¤§«e¦³¸Õ¹L¦bJ2Äæ¦ì¡A¥un¦³Ä²°Ê(½s¿è¹L)J2¡AVBA¦Û°Ê·|°õ¦æ(»yªk¦p¤U)
¦ý§Ú²{¦b¨ÃµLIJ°Ê¡A¦Ó¬O¦bexcel¤u§@ªí¤W(¥kÁä-¿ï¾Ü©Ê¶K¤W-È)¡A¤£ª¾¹D¦³°µ³o°Ê§@¡AVBA¬O§_¤@¼Ë¥i¥H¦Û°Ê°õ¦æ¡H
Private Sub worksheet_change(ByVal target As Range)
If target.Address = "$J$2" Then
Call ·s¼W¹Ïªí¸ê®Æ
Call ·s¼W¹Ïªí¸ê®Æ2
End If
End Sub |
|