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

[µo°Ý] ½Ð°Ý¤U©Ô¦¡¿ï³æ¬O§_¥i¥H¦P®ÉÅã¥Ü¨âÄæ¸ê®Æ

[µo°Ý] ½Ð°Ý¤U©Ô¦¡¿ï³æ¬O§_¥i¥H¦P®ÉÅã¥Ü¨âÄæ¸ê®Æ

¤U©Ô1.JPG
¦p¤W¹Ï©Ò¥Ü¡A§Ú¤w±N¨âÄæ¸ê®Æ©ñ¤J(¤U©Ô¦¡¿ï³æ)¤º

¦ý¿ï¾Ü©Ò­n¸ê®Æ«á«o¦p¤U¹Ï¡A¥u¦³²Ä¤@Äæ¸ê®Æ¡A¥i§_¨âÄæ¦P®ÉÅã¥Ü

With ¿é¤Jªí³æ.¤u¦a¿ï³æ
        .Clear
        .ColumnCount = 2
        .ColumnWidths = "1.5cm;3cm"
        
        For IA = 11 To Sheets("TEMP").Range("R9").Value
            .AddItem
            .List(IA - 11, 0) = Sheets("TEMP").Range("R" & IA).Value
            .List(IA - 11, 1) = Sheets("TEMP").Range("S" & IA).Value
        Next IA
    End With

§Ú°Oªº¥H«e§ÚªºÅv­­¦Ü¤ÖÁÙ¥i¥H¤U¸ü¤j³¡¤Àªº°Ñ¦Ò½d¨Ò¦ý¤£ª¾¦ó®ÉÅv­­ªº±ø¥ó´£°ª¤F?

TOP

§Ú¤]·Q¾Ç,¦ý¬OÅv­­¤£¨¬©O

TOP

¨C¦¸³£³Â·Ð±z¡A¯u¬O¤Ó·PÁ¤F

¦Ó¥BÁÙ¦h±Ð¤F¦n´X©Û

TOP

¥»©«³Ì«á¥Ñ Hsieh ©ó 2010-11-8 21:28 ½s¿è

¦^´_ 2# ltc


    ¦X¨ÖÄæ¦ì¸ê®Æ°µ¬°¿ï³æ¤º®e
list2.rar (11.97 KB)
©Î¥Îµ²¦X¤å¦rÅã¥Ü
list2column.rar (12.41 KB)
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¤U©Ô2.JPG
¸É¤W¹Ï¤G

TOP

        ÀR«ä¦Û¦b : ¬O«D·í±Ð¨|¡AÆg¬ü§@ĵ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD