循环以更新列表

我被困在一个点，我需要在单元格c1到c5中使用5个名称来区分a1到a50。

下面是不工作的代码。 我需要得到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