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

textboxªº­È¦p¦ó«ü©w¬°¤µ¤Ñ¤é´Á

textboxªº­È¦p¦ó«ü©w¬°¤µ¤Ñ¤é´Á



¤p§Ì·Q¦b¦Û©wªí³æ¤¤«ü©wtextbox1ªº¹w³]­È¬°¤µ¤é¤é´Á
½Ð±Ð¦U¦ì¥H¤Uµ{¦¡½XÀ³¸Ó¦p¦ó­×§ï?
  1. Private Sub UserForm_Activate()
  2. TextBox1.Value = Sheet1.Range("E5")
  3. End Sub
½Æ»s¥N½X

¦^´_ 2# lpk187

·PÁÂ!!
¦­¤W¥´¿ùdatrÁÙ¥H¬°¤£¯à³o¼Ë¨Ï¥Î!!

TOP

¦^´_ 1# minture3


Private Sub UserForm_Activate()
TextBox1.Value = Date
End Sub

TOP

        ÀR«ä¦Û¦b : §g¤l¥ß«í§Ó¡A¤p¤H«í¥ß§Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD