在其他工作表中复制数字(内部公式)

时间:2015-03-18 00:13:48

标签: excel vba excel-vba

Sheet1中,我有B10C10,其公式如下:

=SI(B3=0;B6;SI(B6=0;B3;SI(B3<>B6;B6;B3)))

enter image description here

使用VBA我会增加行并添加我的号码。

enter image description here

但是他们是公式的数字是#REF

这是我的VBA代码:

  ThisWorkbook.Worksheets("Modification").Range("A10:AL10").Copy _
        Destination:=ThisWorkbook.Worksheets("Données Enregistrées").Cells(Rows.Count, 1).End(xlUp).Offset(1)

1 个答案:

答案 0 :(得分:0)

您是否尝试过复制/粘贴值?

Sub CopyCol()
    Sheets("Sheet1").Columns("A").Copy
    Sheets("Sheet2").Columns("B").PasteSpecial xlPasteValues
End Sub

Excel VBA Copy Paste Values only( xlPasteValues )