Excel VBA /宏，将行移动到另一个工作表，只有值

我有一个简单的问题，我找不出来。Excel VBA /宏，将行移动到另一个工作表，只有值

现在我有一个宏设置，将选定的一行移动到另一个工作表的底部，并根据好/坏结果更改它的颜色。

我需要单元格值和颜色格式复制/粘贴到其他工作表。

这里是我的代码现在

Sub CloseCasePaid() 
' 
' CloseCasePaid Macro 
' 
With Selection.Font 
    .Color = -1003520 
    .TintAndShade = 0 
End With 

Selection.EntireRow.Copy Sheets("Closed Files").Cells(Rows.Count, 1).End(xlUp).Offset(1) 
Selection.EntireRow.Delete xlShiftUp 

End Sub

谢谢你的任何援助！

来源

2016-04-29 warvolin

'它工作到目前为止'所以呃有什么问题？你有什么问题？ – findwindow

对不起，它可以将行移动到另一个工作表上，但它不会仅复制这些值。我需要它仅移动这些值。 – warvolin

然后将范围设置为彼此而不是复制/粘贴。 – findwindow

您需要使用粘贴特殊值。语法如下：

Range("A1").Copy 

Range("B2").PasteSpecial (xlPasteValues)

我会在删除行之前执行此操作，因为删除行会将其从剪贴板中删除。

来源

2016-04-29 18:23:04

复制/粘贴非常缓慢。如果只需要值，则相互设置范围。 – findwindow

@findwindow但是，这也排除格式...你确定他不需要它？ –

@DirkReichel per OP'我需要它来移动值'编辑：粘贴值是好/作品。只要你知道得更好，你就会努力做得更好^ _ ^; – findwindow

Excel VBA /宏，将行移动到另一个工作表，只有值

回答

相关问题