时间戳

首页 > 解决方案 > 选择性粘贴不适用于粘贴值

copy-paste - 选择性粘贴不适用于粘贴值

问题描述

我收到编译错误和语法错误

我都试过了

.PasteSpecial xlPasteValues
Paste:=xlPasteValues

Set wsCopy = Worksheets("Sheet2")
Set wsDest = Worksheets("Sheet3")

  1. 根据 A 列中的数据查找复制范围中最后使用的行 lCopyLastRow = wsCopy.Cells(wsCopy.Rows.Count, "A").End(xlUp).Row

  2. 根据 A 列中的数据查找目标范围中的第一个空白行'偏移属性向下移动 1 行 lDestLastRow = wsDest.Cells(wsDest.Rows.Count, "A").End(xlUp).Offset(1).Row

  3. 复制和粘贴值 wsCopy.Range("A4:BL" & lCopyLastRow).Copy _ wsDest.Range("A" & lDestLastRow).PasteSpecial xlPasteValues

要仅粘贴值而不粘贴值，我将复制所有公式，我只需要这些值。

标签： copy-paste

解决方案

复制和粘贴值 wsCopy.Range("A4:BL" & lCopyLastRow).Copy wsDest.Range("A" & lDestLastRow).PasteSpecial xlPasteValues

推荐阅读