ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Macro aid please (https://www.excelbanter.com/excel-discussion-misc-queries/111357-macro-aid-please.html)

Ryk

Macro aid please
 
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


Dave Peterson

Macro aid please
 
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

Ryk wrote:

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


--

Dave Peterson

Ryk

Macro aid please
 

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


Dave Peterson

Macro aid please
 
Glad it worked ok.

Ryk wrote:

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


--

Dave Peterson


All times are GMT +1. The time now is 01:55 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com