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

[µo°Ý] ½Ð°Ý ¦Û­qªí³æ ªº¤U©Ô²M³æ·|¦³¤j¶qªÅ¥Õ

[µo°Ý] ½Ð°Ý ¦Û­qªí³æ ªº¤U©Ô²M³æ·|¦³¤j¶qªÅ¥Õ

½Ð°Ý³o­n«ç»ò§ó§ï©O? ½d³ò¤]¥u³]©w¨ì¦³¸ê®Æªº°Ï°ì
¦pA1~A10
¦ý¤U­±´N¦h¤F¶Wªø¤@±ÆªºªÅ¥Õ,­n¦AÄÝ©Ê­þÃä¦p¦ó³]©w©O?
2015-05-07_101123.jpg

¸ê®Æ¬Ý°_¨Ó¥u¦³3¦C¡A¦ý±z«o¥Î10¦C(A1~A10)
¥H¦Ü©ó²£¥Í¦h­ÓªÅ¥Õ¦C

TOP

¦^´_ 2# mistery


©êºp~¨S»¡©ú²M·¡¥u¬O°²³]    A1~10³£¦³¸ê®Æ
¹ÏÀÉ©Òªþªº¬O¥u³]©w3¦C,¤]¥u¦³3¦C¸ê®Æ ¦ýªÅ¥ÕÁÙ¬O«Üªø¤@¤j¬q

TOP

¥»©«³Ì«á¥Ñ lpk187 ©ó 2015-5-26 16:57 ½s¿è

¦^´_ 3# starry1314

§Ú¥ý°²³]§A¦³¥i¯à¥Î¨ìA50¦n¤F¡A­Y¨S¦³¥Î¨ìA50¶K¥uÅã¥Ü¨ì§A¦³¸ê®Æ¤§³B
¦b¸ê®ÆÅçÃÒªº¨Ó·½³B¶ñ¤J¦p¤Uªº¨ç¼Æ
=OFFSET(A1,,,COUNTA(A1:A50),)

TOP

¦^´_ 3# starry1314


   ¦p¹Ï

TOP

¦^´_ 5# lpk187


    ¦]§Ú¬O°µ¦A¦Û­qªí³æ¸Ì­±..
Private Sub UserForm_Initialize()
With Sheets("¥XÀ\³æ")
arr = Sheets("¼Æ¾Ú").Range("OFFSET(A1,,,COUNTA(A1:A50),)" & Cells(Rows.Count, 1).End(xlUp).Row) 'Ū¨ú A2:A18°µ²M³æ¨Ó·½
ComboBox1.List = arr

SO~¤£ª¾¦p¦óÅÜ°Ê

TOP

¥»©«³Ì«á¥Ñ lpk187 ©ó 2015-5-26 20:49 ½s¿è

¦^´_ 6# starry1314


¤£¦n·N«ä¡A§Ú¥H¬°¬OÅçÃÒ²M³æ
¦p¤U¡G
  1. Private Sub UserForm_Initialize()
  2. arr = Sheets("¼Æ¾Ú").Range("a2:a" & Sheets("¼Æ¾Ú").Cells(Rows.Count, 1).End(xlUp).Row)
  3. ComboBox1.List = arr
  4. End Sub
½Æ»s¥N½X

TOP

¦^´_ 6# starry1314


    play.gif
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 8# Hsieh


    ·PÁªO¥D¡ã¤S¦h¾Ç¤@©Û¡I

TOP

»Å­C
ÁöµMÁÙ¨S¥Î¨ì VBA
¦ý¥ý¾Ç°_¨Ó©ñ¦n¤F ^^

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡¦¨´N¤@¤Á¡j®É¶¡¥i¥H³y´N¤H®æ¡A¥i¥H¦¨´N¨Æ·~¡A¤]¥i¥HÀx¿n¥\¼w¡C
ªð¦^¦Cªí ¤W¤@¥DÃD