Операция копирования и вставки приводит к # ЗНАЧЕНИЮ! ошибка

Question

Я пытаюсь объединить три листа в один мастер-лист, он работает нормально, однако мои два листа содержат формулу, и при вставке непосредственно это дает мне #VALUE!, что, очевидно, из-за формулы, содержащей столбцы.

Итак, я хочу вставить специальные три листа в один мастер-лист, чтобы он не дал мне #VALUE! в мастер-листе.

Вот код, который я использую:

Sub Combine3Sheet()

    Dim Ary As Variant
    Dim Ws As Worksheet

    Ary = Array("Sheet1", “Sheet2", "Sheet3")
    Sheets("Master").Name = "Master"

    For Each Ws In Worksheets(Ary)
        Ws.UsedRange.Offset(1).Copy Sheets("Master") _
        .Range("A" & Rows.Count).End(xlUp).Offset(1)

        Application.DisplayAlerts = False
        Application.DisplayAlerts = True

        Call Formatting

    Next Ws

End Sub

Answer 1

Используйте PasteSpecial xlPasteValues вместо Copy Destination:=

ws.UsedRange.Offset(1).Copy
Sheets("Master").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlPasteValues