Macro aid please

R

Ryk

I have the following macro doing a filldown and it works perfectly.
Dim a As Long
a = Range("B" & Rows.Count).End(xlUp).row
Range("C6:BQ" & a).FillDown
End Sub
I then have a second sheet I would like to at the same time, autofill
down the exact number of lines the first sheet pulls down, am hoping to
have one macro pull both pages down, based on the above macro. How
would I do this, if its possibel or do i need 2 macros to do this?

Ryk
 
D

Dave Peterson

maybe...

Option Explicit
sub Testme()

Dim a As Long
with worksheets("sheet1")
a = .Range("B" & Rows.Count).End(xlUp).row
.Range("C6:BQ" & a).FillDown
end with
with worksheets("sheet2")
.range("c6:bq" & a).filldown
end with
End Sub
 
R

Ryk

Once again Dave you came through huge! Sorry reply took so long,
working hard to finish this project by Oct 14th. Just wanted to add
yet another thank you to you, adding to my list hehe.

Thanks...

Dave aka Ryk
 
D

Dave Peterson

Glad it worked ok.
Once again Dave you came through huge! Sorry reply took so long,
working hard to finish this project by Oct 14th. Just wanted to add
yet another thank you to you, adding to my list hehe.

Thanks...

Dave aka Ryk
Click to expand...
 
Top