Excel 如何基于For语句将单元格区域复制到另一列
我对Excel 如何基于For语句将单元格区域复制到另一列,excel,range,Excel,Range,我对VBA非常陌生,我正在尝试将工作表第一列中的一系列日期复制到另一列。我使用For命令,因此实际显示的日期数可以根据不同单元格中的输入而更改 以下是我目前掌握的情况: Sub Plus1_ForLoop() Range("G:G").ClearContents Dim num_months As Integer num_months = Cells(3, 8) * 12 - 1 For i = 3 To WorksheetFunction.CountA(Range("F3:F1113"
VBA
非常陌生,我正在尝试将工作表第一列中的一系列日期复制到另一列。我使用For命令,因此实际显示的日期数可以根据不同单元格中的输入而更改
以下是我目前掌握的情况:
Sub Plus1_ForLoop()
Range("G:G").ClearContents
Dim num_months As Integer
num_months = Cells(3, 8) * 12 - 1
For i = 3 To WorksheetFunction.CountA(Range("F3:F1113")) - (num_months - 2)
Cells(i, 7).Formula = "=product(F" & i & ":F" & i + num_months & ")^(1/" & Cells(3, 8) & ")-1"
Next i
For i = 3 To WorksheetFunction.CountA(Range("A3:A1113")) - (num_months - 2)
Cells(i, 9) = Range("A & i & :A & i + num_months & ")
Next i
End Sub
我的问题是关于代码的第二个问题。我知道我在解释方面做得很糟糕,但我很感激任何提示。请将代码作为文本而不是照片输入。我们无法复制粘贴照片。您缺少结束
“
:单元格(i,9)=范围(“a”&i&“:a”&i+num\u months&“
有几件事:)“a&i&:a&i+num\u months&“
应该是“a”&i&“&i+num\u months”),但不能将一个值范围放在一个范围内,所以我不确定你想用这个语句做什么,我想把Ai:A(I+num_months)中的值的范围放在第I列,从第三行开始(本例中是单元格(I,9))