excel循环复制指定单元格内容到指定列的单元格往下填充。

excel循环复制sheet1表B19:F19单元格（数据不停的改变）内容往sheet2表指定列B19:F19,B20:F20.B21:F21……不停的往下一行粘贴，能否用函数表达或者录制宏来完成

2026年09月27日 00:11

有2个网友回答

网友（1）：

在sheet2
B19中输入=Sheet1!$B$19
C19中输入=Sheet1!$C$19
D19中输入=Sheet1!$D$19
E19中输入=Sheet1!$E$19
F19中输入=Sheet1!$F$19
选中Sheet2中B19:F19，下拖填充公式即可
做完后，不想留公式的话，全选该区域，复制，选择性粘贴——数值（2007中是文本）

网友（2）：

Sub My()
Dim I%
Sheet1.[B19:F19].Copy
For I = 1 To 10 '这里等同于输入复制的次数，现在复制10次，自己修改这个10
Sheet2.[B18].Offset(I, 1).PasteSpecial '黏贴的位置，offset的作用是平移位置
Next
End Sub