xyz66217

¤£ª¾¹D¬O¤£¬O§A­nªº??¡@¡@
¦pªG¥u¬O¶ñ¤J¼Æ­È¡A¥Î³o­Ó¡C   ¦pªG­n³sÃC¦â³£ÅÜ¡A´N§ï¦¨ copy & paste

Sub test()
    input_button = Cells(3, 9)
    a = 2
    a = input_button + (input_button * a)
    c = 11
    For b = 3 To 6
        Cells(b, 10) = Cells(c, a)
        c = c + 1
    Next b
End Sub

xyz66217

³oºØ¦³³W«ßªº¡A¦Aµy·L±ÀºV¤@¤U¡A¥i¥H±o¨ì¤½¦¡

Sub test()
    input_button = Cells(3, 9)
    a = 2
    a = input_button + (input_button * a)
    c = 11
    For b = 3 To 6
        Cells(c, a) = Cells(b, 10)
        Cells(18, a - 1) = Cells(3, 12)
        Cells(19, a + 1) = Cells(5, 12)
        c = c + 1
    Next b
End Sub