gpt4 book ai didi

vba - 复制工作表中的所有内容vba

转载 作者:行者123 更新时间:2023-12-03 01:49:57 25 4
gpt4 key购买 nike

' Copy
wb.Sheets(wsSource.Name).Range("A1:W79").Copy
' Paste Special
wbTarget.Sheets("Sheet1").Range("A1:W79").PasteSpecial xlValues
wbTarget.Sheets("Sheet1").Range("A1:W79").PasteSpecial xlFormats

此代码允许我复制 A1:W79 范围内的所有内容。如何修改此范围,以便它选择工作表中包含值的所有内容。例如,工作表可能包含来自 C7:G20 等的值。

最佳答案

我会像下面这样:

With wb.Sheets(wsSource.Name).UsedRange
.Copy
With wbTarget.Sheets("Sheet1").Range(.Address)
.PasteSpecial xlValues
.PasteSpecial xlFormats
End With
End With

关于vba - 复制工作表中的所有内容vba,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43114161/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com