[英]VBA: Copy paste without clipboard
有没有办法在不使用剪贴板的情况下将其作为一行复制/粘贴。 复制一个范围 - 行到另一个工作表粘贴范围 - 整行。 我需要价值观,而不是公式。
Sheets("Data").Select
ActiveCell.EntireRow.Copy
Sheets("TSP").Select
ActiveCell.PasteSpecial Paste:=xlPasteValues
此代码复制值(不是公式)。
Sub a()
Worksheets("Sheet2").Range("TS").Value=Worksheets("Sheet1").Range("1:1").Value
End Sub
其中“TS”是范围的名称(一行)。
这是你想要实现的目标吗?
编辑
要将活动行复制到Sheet2.Row2(例如),您可以尝试:
Sub a()
Dim myrow As Integer
myrow = ActiveWindow.RangeSelection.Row
Worksheets("Sheet2").Range("2:2").Value = Worksheets("Sheet1").Rows(myrow).Value
End Sub
HTH!
出于某种原因,没有。 PasteSpecial
是关于剪贴板的。
如果您只需要值,请复制For
循环。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.