хотите вставить столбцы A & b из одной wkbook в другую wkbook с указанным заголовком c (имя requstee)

Question

Dim MyColumn  As String, lastrow As Long, wb As Workbook, cell As Range, rngAddress As Range, wbTarget As Workbook
Set clipboard = New MSForms.FataObject
Set wb = Workbooks("Holiday form (11) .xlsm")
With wb.Sheets("sheet4").Select
lastrow = Range("A" & Rows.Count).End(xlUp).Row
Range("A2:B2" & lastrow).Copy
End With
Set wbTarget = Workbooks.Open("C:\Users\msheppar\Desktop\new holiday project\working forms" & "\Master Holiday Tracker.xlsm")
Set rngAddress = wbTarget.Sheets("sheet1").Range("A1:BZ1").Find("name")

Если rngAddress - Ничто, Выход из Sub End If Range (rngAddress, rngAddress.End (xlDown)). Вставить End Sub