循环更新列表

Question

我陷入困境，我需要在单元格c1到c5中将5个名称范围从a1到a50。

以下是无效的代码。我需要得到单元格C1到c5循环的范围，我的意思是当范围（a5用c5值填充）时，A6应该得到范围c1值。 如果我不清楚，请告诉我。以下是ref的代码

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