ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

²Õ¦X¤è¶ô¼g¤JVBA°ÝÃD

²Õ¦X¤è¶ô¼g¤JVBA°ÝÃD

¦p°Æ¥ó©Ò«üVBA¥i¦æ¶Ü½Ð«ü¾ÉÁÂÁÂ

²Õ¦X¤è¶ô123.rar (6.1 KB)

·PÁÂluhpro ¤j¤j«ü¾É¦ý¤p§Ì´ú¸Õ¦n¹³¨B¦æ­C½Ð¦b«ü¾ÉÁÂÁÂ

TOP

luhpro¤j¤j¯u¬O°ª©Û¤p§Ì¥Ì«ô¤U­·ÁÂÁ­@¤ß«ü¾É¤p§Ì¥i§_¦A°Ý¤@ÃD¦p¤U¦C
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$3" Then UserForm1.Show
End Sub
§Ú­nÅýa3-a7+e3e7+g3-g7+i3-i7+k3-k7+m3-m7¤@¼Ë·|¨q¥XUserForm1.Show½Ð°ÝVBA­n¦p¦ó§ï

TOP

·P谢luhpro¤j¤j­@¤ß«ü¾É¤p§Ì¨ü¯q¨}¦h´ú¸Õ¤w¥i¥HÁÂÁ±оɷP®¦§A

TOP

¦^´_ 4# luhpro
¤p§Ì¨ü±Ð¤F¥H¸g¸Ñ¨M¥i¥H¤F·P®¦±Ð¾É

TOP

        ÀR«ä¦Û¦b : Ãø¦æ¯à¦æ¡AÃø±Ë¯à±Ë¡AÃø¬°¯à¬°¡A¤~¯àª@µØ¦Û§Úªº¤H®æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD