請問有人會用EXCEL的巨集嗎?

[小丹尼]

假設
A1欄位輸入: 奇異果，A2欄位輸入:丹尼爾，
B1欄位由使用者輸入:2，B2欄位輸入:3時，
要用什麼參數 才能依照使用者在B欄位輸入不同數字，而後面的結果可以產生不同的C字串列?
依次得出"C1欄位奇異果 C2欄位奇異果 C3欄位丹尼爾 C4欄位 丹尼爾 C5欄位丹尼爾"

[leonchou]

Sub xxx()
Columns("C").ClearContents
For r = 1 To [A65536].End(xlUp).Row
    r1 = IIf(r = 1, 0, [C65536].End(xlUp).Row)
    For i = 1 To Cells(r, 2)
        Cells(r1 + i, 3) = Cells(r, 1)
    Next i
Next r
End Sub 

[小丹尼]

好利害...謝謝高手..感恩中ing...

[leonchou]

也問到不用巨集的方法，
我覺得這才真是厲害... 參考囉
http://gb.twbts.com/index.php/topic,2301.0.html