用VBA写代码将指定列的内容循环写入另一个列中

你好，我可以回答这个问题。您可以使用以下代码将指定列的内容循环写入另一个列中：

Sub CopyColumn()
Dim LastRow As Long
Dim i As Long

LastRow = Cells(Rows.Count, "A").End(xlUp).Row '假设您要复制的列是A列

For i = 1 To LastRow
Cells(i, "B").Value = Cells(i, "A").Value '假设您要将A列的内容复制到B列
Next i
End Sub

请将代码复制到VBA编辑器中，并将A列和B列更改为您要使用的列。然后运行代码即可将A列的内容循环写入B列中。希望对您有所帮助！