Макрос для копирования листа и вставки в новый файл с использованием специальных значений вставки

Question

У меня есть макрос, и я хочу, чтобы он скопировал лист 1 из файла A, вставил его (используя специальные значения вставки) в файл B и скрыл кнопку макроса на вставленном листе в файле B? Это моя отправная точка

Private Sub Update_Click()

Sheets("Dallas").Select
Sheets("Dallas").Copy

End Sub

Answer 1

Если вы ищете только для копирования значений ячеек и ничего больше, ярлык будет выглядеть примерно так:

dim rgSource as range
dim rgTarget as range

set rgSource = ActiveSheet.UsedRange  ' cells containing values on src sheet
set rgTarget = Workbooks.Add.Worksheets(1).Cells(1,1) ' new range on target sheet
set rgTarget = rgTarget.Resize(rgSource.Rows.Count, rgSource.Columns.Count) ' same sz

rgTarget = rgSource.Value  ' copies values into the target range on the other sheet