I have two sheets:Master with all data and sheet2 with some columns that are
the same as master. I set a formula simply links some data in Sheet2.
I need to copy this formula in sheet2 down up to last row in master sheet.
I started working on the macro, but I am stuck. Can you help?
Sub Macro7()

Sheets("Master").Select

Dim LastRow As Long

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

'MsgBox OstatniWiersz


Sheets("Sheet2").Select
Range("a2:s2").Select
Selection.Copy
....?

Eva,

Replace

Range("a2:s2").Select
Selection.Copy
....?

With

Range("a2:s2").Copy Range("a2:s" & LastRow)

HTH,
Bernie
MS Excel MVP


"Eva" <(E-Mail Removed)> wrote in message
news:F7CA0DCE-0B13-44FB-813A-(E-Mail Removed)...
>I have two sheets:Master with all data and sheet2 with some columns that are
> the same as master. I set a formula simply links some data in Sheet2.
> I need to copy this formula in sheet2 down up to last row in master sheet.
> I started working on the macro, but I am stuck. Can you help?
> Sub Macro7()
>
> Sheets("Master").Select
>
> Dim LastRow As Long
>
> LastRow = Cells(Rows.Count, 1).End(xlUp).Row
>
> 'MsgBox OstatniWiersz
>
>
> Sheets("Sheet2").Select
> Range("a2:s2").Select
> Selection.Copy
> ...?