excel vba如何实现夸合并单元格复制 100
1个回答
展开全部
你不想复制格式的话，有两种办法，一是复制后选择性粘贴值，二是先将数据存入数组
方式一的代码如下：
Sheet1.UsedRange.Copy
Sheet2.Range("A1").PasteSpecial xlPasteValues
方式二代码如下：
Arr = Sheet1.UsedRange
Sheet2.Range("A1").Resize(UBound(Arr), UBound(Arr, 2)) = Arr
方式一的代码如下：
Sheet1.UsedRange.Copy
Sheet2.Range("A1").PasteSpecial xlPasteValues
方式二代码如下：
Arr = Sheet1.UsedRange
Sheet2.Range("A1").Resize(UBound(Arr), UBound(Arr, 2)) = Arr
更多追问追答
追问
能给一段完整的代码吗？用数组的，因为里面还涉及别的循环。
追答
方式二的代码就是完整的呀，第一句将表格1的数据写到数组里，第二句将数组里的数据写表表格2中。只是代码中的表格1和表格2不一定与你实际表格相符，难道表格1和表格2在代码中该怎样表示难道你也不会吗？没有你的具体文件，我也帮不了你
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
