VBA粘贴值|使用VBA复制和粘贴值的三大技巧

Excel VBA粘贴值

复制和粘贴不是世界上最伟大的工作!!!但是,使用特殊选项进行复制和粘贴需要VBA中的某种知识。这不是简单的复制和粘贴过程,而是简单明了的过程。重要的粘贴特殊方法之一是VBA中的“粘贴值”。

如何使用VBA在Excel中粘贴值?

您可以在此处下载此VBA粘贴值Excel模板– VBA粘贴值Excel模板

示例#1 –使用选择性粘贴

有关示例,请参见下面的工作表图像。

在单元格B6中,我们应用了公式来计算从B2到B5单元格的总销售额。现在,如果我将单元格B6复制并粘贴到C6中,则不会得到22,761的值,但会得到相应的公式。

为了在VBA中执行相同的操作,我们需要编码知识。我们将向您展示如何使用VBA粘贴值。请遵循以下步骤。

步骤1:复制单元格B6。

若要复制单元格B6,请使用代码作为范围(“ B6”)。

步骤2:选择目标单元格。在这种情况下为C6电池。

正如您在复制后看到的那样,它询问“目的地”。这就是您要粘贴的位置,因此请选择“目标”作为范围(“ C6”)

代码:

 Sub Paste_Values()Range(“ B6”)。Copy Range(“ C6”)End Sub 
步骤3:运行代码

运行此代码,我们将在C6中获得B6副本。

我们这里只有公式。

步骤4:执行选择性粘贴方法。

要执行粘贴特殊方法,请看下面的粘贴特殊方法的语法。

在粘贴特殊方法中,我们有几种方法。根据我们正在执行的操作,我们需要相应地选择类型。

为了理解,我们将代码分为两行。

第一个是复制单元格B6。

现在,在下一行中,将目标单元格写入范围(“ C6”)

现在要访问“特殊粘贴方法”,请放一个点并开始输入字母“ P”。

在以上各种选项中,选择“特殊粘贴”方法。

选择方法后,请按空格键以查看各种粘贴特殊方法。

在各种选项中,选择“ xlPasteValues”。

选择选项后,按Tab键自动选择。

代码:

 Sub Paste_Values()Range(“ B6”)。Copy Range(“ C6”)。PasteSpecial xlPasteValues End Sub 

步骤5:运行代码

现在运行代码,我们应该只将单元格B6的值获取到单元格C6。

如果在运行代码后注意到工作表,则该工作表仍仅处于复制模式。

执行粘贴特殊方法后,这将禁用剪切复制模式。

示例2 –带循环的特殊粘贴

特殊粘贴很容易,但是就将其用作大型代码的一部分而言,则需要高级的编码技能。

例如,请看下面的图片。

在工作表的上图“ F”列中,我们具有总计列,即F2,F5,F8,F11和F14单元格。

现在,我的要求是从相应的单元格复制每个总单元格,然后将相应的单元格粘贴到“ H”列中。

使用下面的代码,通过VBA循环,我们可以做到这一点。

代码:

 Sub Paste_Values1()Dim k作为整数Dim j作为整数j = 2对于k = 1至5个像元(j,6)。复制像元(j,8).PasteSpecial xlPasteValues j = j + 3下一个k结束子 

带有粘贴特殊代码的代码将执行复制每个总单元格的任务,并粘贴带有相应单元格的“ H”列。

Example#3 –从工作表复制到另一个

要将值从一个工作表粘贴到另一个工作表,我们需要同时提及两个工作表名称。下面是一个例子。

 Sub Paste_Values2()工作表(“ Sheet1”)。Range(“ A1”)。Copy Worksheets(“ Sheet2”)。Range(“ A15”)。PasteSpecial xlPasteValues End Sub