循環到更新列表

Question

我被困在一個點，我需要範圍a1到a50與單元格c1到c5中的5個名稱。

下面是不工作的代碼。我需要在C1到C5範圍內循環，我的意思是當範圍（a5得到c5值）時，A6應該得到範圍C1值。 如果我不清楚，請告訴我。以下是參考

代碼

Sub test() 
For x = 2 To 5 
For k = 2 To 50 
Range("a" & k).Value = Range("C" & x).Value 
k = k + 1 
Next 
Next 
End Sub 

Answer 1

試試下面的代碼：

Sub Test() 
    k = 1 

    For x = 1 To 50 
     Range("a" & x).Value = Range("C" & k).Value 
     k = k + 1 
     If k > 5 Then k = 1 
    Next 
End Sub