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

¤@­Óªí³æ°ÝÃD

¦^´_ 6# hong912
¸Õ¸Õ¬Ý
  1. Private Sub UserForm_Initialize()
  2.     ComboBox1.List = ¤u§@ªí2.UsedRange.Columns(1).Value
  3. End Sub

  4. Private Sub CommandButton1_Click()
  5.     Range("C:C").Find("*", , , , , xlPrevious).Offset(, 10) = Me.ComboBox1
  6.     Unload Me
  7. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 5# ©P¤j°¶
Ãþ¦ü³o¼Ëªº¶Ü?

Ex.rar (22.77 KB)
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 11# 317

¸Õ¸Õ¬Ý


    Ex.rar (34.75 KB)
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD