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

[µo°Ý] ½Ð±ÐVBA¦p¦ó¼u¥Xµøµ¡,¤U©Ô¿ï¶µ¿é¤J

[µo°Ý] ½Ð±ÐVBA¦p¦ó¼u¥Xµøµ¡,¤U©Ô¿ï¶µ¿é¤J

½Ð±Ð¤j¤j
¼u¥Xµøµ¡«á,¥X²{¤U©Ô¿ï¶µ,µM«á¿ï¾Ü¸ê®Æ
°²³],¤U©Ô¿ï¶µªº°Ñ·Ó¤å¦r¦bA5~A10
½Ð±Ð,VBAµ{¦¡½X­n¦p¦ó¼g?

ÁÂÁÂÀ°¦£·P®¦!

¦^´_ 1# blue2263
½×¾Â¦³³\¦h¥i·j´M
  1. Private Sub UserForm_Initialize()  '¶}°_ªí³æªì©lµ{§Ç
  2.     ComboBox1.List = [A1:A10].Value
  3.     ListBox1.List = [A1:A10].Value
  4. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

ÁÂÁÂG¤jÀ°¦£!
§Ú¦³¥h¬Ý½×¾Â¤§«eªº¤å³¹,¤£¬O«ÜÀ´
½Ð±ÐG¤j, combobox1.¬O­n«ü©w¤°»òª«¥ó
§Ú¥[¤J¦¹¦ælistbox1.List = [A1:A10].Value
·|¥X²{§ä¤£¨ì¦¨­û¤Î¤èªk°T®§,¤£ª¾¨ºÃä³]©w¿ù»~?
¬¡­¶Ã¯2.rar (16.13 KB)

TOP

¦^´_ 3# blue2263
combobox1 ¬Ocombobox±±¨î¶µªº¦¨­û¦WºÙ¬°combobox1
listbox1     ¬Ocombobox±±¨î¶µªº¦¨­û¦WºÙ¬°listbox1

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

TOP

¤F¸Ñ¤F,ÁÂÁÂG¤jªº¼ö¤ßÀ°¦£
·P¿E¤£ºÉ!!

TOP

        ÀR«ä¦Û¦b : ¦³¤ß´N¦³ºÖ¡A¦³Ä@´N¦³¤O¡A¦Û³yºÖ¥Ð¡A¦Û±oºÖ½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD