vba excel 复制合并单元格

2024-11-16 17:43:00

推荐回答（4个）

回答1：

Sub Macro1()
sheets("Sheet1").select '选择数据源工作表
Range("A1:A10").Select '要提制的数据区域
Selection.Copy '复制
Sheets("Sheet2").Select '选择目标工作表
Range("C3").Select '要开始粘贴的位置
ActiveSheet.Paste '粘贴
End Sub

回答2：

Sub Macro1()
Range("A1:E10").Select
Selection.Copy '复制
Sheets("Sheet2").Select
ActiveSheet.Paste ‘粘贴
Range("A3").Select
End Sub

回答3：

在VB的代码框，为Sheet1添加过程Public Sub Macro1()
sheets("sheet1").select '选择数据源工作表
Range("A1:A10").Select '要提制的数据区域
Selection.Copy '复制
Sheets("sheet2").Select '选择目标工作表
'Range("C3").Select '要开始粘贴的位置这条语句要用光标在Sheet2中定位。
ActiveSheet.Paste '粘贴
End Sub
执行以上过程即可。

回答4：

直接全选表格后到另一个工作表点右键选粘贴。