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

¦p¦ó¦bªí³æÅã¥Ü Excel ¬YÄæ¦ìªº¼Æ­È¡H

¦^´_ 3# bowwow1975
¨Ã¼W¥[¤@­Ó°õ¦æ«ö¶s¡I
  1. Private Sub CommandButton1_Click() '³o¬Oªí³æ¤Wªº«ö¶s
  2.     With Sheet3
  3.         .Range("G3").Value = TextBox1.Text   'µLªk¥Î¼Æ¦r©R¦Wªí³æ±±¨î¶µ
  4.         .Range("G10").Value = TextBox2.Text  '¦p 1 ,2 -> 1.TEXT ,2.TEXT ¤£±µ¨ü
  5.         Label1 = .Range("F5").Text            'ªí³æ¥i·s¼W¤@Label±±¨î¶µ ±µ¦¬ F5
  6.     End With
  7. End Sub
½Æ»s¥N½X

TOP

¦^´_ 5# bowwow1975

TOP

        ÀR«ä¦Û¦b : ¤@¥y·Å·xªº¸Ü¡A´N¹³©¹§O¤H¨­¤WÅx­»¤ô¡A¦Û¤v·|ªg¨ì¨â¤Tºw¡C
ªð¦^¦Cªí ¤W¤@¥DÃD