首页 > 解决方案 > 如何编辑此代码以仅使用 VBA 粘贴值?

问题描述

我在 VBA 中有这段代码可以复制并粘贴到 DK 列中的下一个空单元格中,但是鉴于原始单元格是一个函数,粘贴的值显示为 0。有没有办法只粘贴原始单元格的值?

Sub CopyToDK()
Range("CN59").Copy Range("DK" & Rows.Count).End(xlUp)                                               
End Sub

标签: excelvba

解决方案


如果你只想复制值,你可以这样做......

Sub CopyToDK()
Range("DK" & Rows.Count).End(xlUp) = Range("CN59")                                               
End Sub

推荐阅读