Question

急~如何在excel中使用宏进行批量复制~

Answer 1

1.是这样的，偶想在excel表中批量复制，以便改动数据的位置。宏已经录制好了，但是不会改VBA编码。麻烦高手赐教啊~~编码如下：
,我只说改编码
Sub
Macro4()
'
'
Macro4
Macro
'
宏由
微软用户
录制，时间:
2010-10-11
'以下指选定并复制B2到D2的单元格数据，可改为：Range("B2:D2").Copy
,改动B2：D2即改动要复制的单原格范围
Range("B2:D2").Select
Selection.Copy
'以下指要复制到的地方，可改为：Range("B6").Select
另取一行：ActiveSheet.Paste
，改动B6即改动要复制到的地方，如把B6改为D8，数据将从D8单原格的位置开始填充
Range("B6").Select
Selection.PasteSpecial
Paste:=xlPasteValues,
Operation:=xlNone,
SkipBlanks
_
:=False,
Transpose:=False
，以下功能同上都是指复制与粘贴
Range("E2:G2").Select
Application.CutCopyMode
=
False
Selection.Copy
Range("B7").Select
Selection.PasteSpecial
Paste:=xlPasteValues,
Operation:=xlNone,
SkipBlanks
_
:=False,
Transpose:=False
，以下功能同上都是指复制与粘贴
Range("H2:J2").Select
Application.CutCopyMode
=
False
Selection.Copy
Range("B8").Select
Selection.PasteSpecial
Paste:=xlPasteValues,
Operation:=xlNone,
SkipBlanks
_
:=False,
Transpose:=False
End
Sub

Answer 2

这个简单
先录制宏
再看着插入变量
进行循环即可