Как копировать данные без формул или форматирования при консолидации листов

Question

Я хотел бы скопировать только значения (без формул и форматирования) при объединении множества рабочих таблиц в одну таблицу, но я знаю только метод PasteSpecial и не знаю, как применить его к этому.

myRange.Copy Место назначения: = листы («комбинированные»). Диапазон («А1»). Смещение (lastRow) .Pastespecial xlPastevalues? Или может как-то изменить тип диапазона на значение?

Я не знаю VBA. Только с использованием простых макросов на ежедневной основе. Буду благодарен за любую помощь.

Sub Combine()
Dim jCt As Integer
Dim ws As Worksheets
Dim myRange As Range
Dim lastRow As Long
lastRow = 1

Worksheets.Add
Sheets(1).Name = "Combined"

For jCt = 2 To Sheets.Count

    Set myRange = Sheets(jCt).Range(Sheets(jCt).Cells(3, 1), Sheets(jCt).Range("A1").SpecialCells(xlCellTypeLastCell))
    Debug.Print Sheets(jCt).Name, myRange.Address

    myRange.Copy Destination:=Sheets("Combined").Range("A1").Offset(lastRow) 

    lastRow = lastRow + myRange.Rows.Count 


Next
End Sub