我正在尝试使用vba宏在Excel中将值从表复制到范围,但是我不希望表格式,仅是它的值。我怎样才能做到这一点?
这是代码的一部分:
'Source range
Set r = Sheets("Sheet1").Range("Table1")
'Destination range
Set dest = Range(.Cells(linhaAtual, 1), .Cells(linhaAtual + r.Rows.Count - 1, 5))
r.Copy Destination:= dest
我实现了一个可行的解决方案。
下面是代码:
Set r = Sheets("Criteria").Range("CriteriaTable")
Set dest = Range(.Cells(linhaAtual, 1), .Cells(linhaAtual + r.Rows.Count - 1, 5))
Sheets("Criteria").Activate
r.Select
Selection.Copy
Sheets("Load").Activate
dest.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句