ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Autofill to the last empty cell in a range (https://www.excelbanter.com/excel-programming/424098-autofill-last-empty-cell-range.html)

Jim[_73_]

Autofill to the last empty cell in a range
 
I have a list that looks like this:

10010 11221 102.00
102.00
102.00
10011 11247 103.50
103.50
103.50


The list goes on for thousands of rows. The columns are A, B and C.
I am trying unsucessfully to create a macro to autofill the first two
columns until the numbers change. In other words, 10010 would stop at
the last empty cell above 10011. It would repeat this all down the
page.

I am currently trying to count up from the bottom of the page...but I
don't know the code to loop the formula.

Thanks

joel

Autofill to the last empty cell in a range
 
Sub fillcolumns()

RowCount = 1
StartRow = RowCount
Do While Range("C" & RowCount) < ""
If Range("A" & (RowCount + 1)) < "" Or _
Range("C" & (RowCount + 1)) = "" Then

Range("A" & StartRow & ":B" & StartRow).Copy _
Destination:=Range("A" & StartRow & ":B" & RowCount)

StartRow = RowCount + 1
End If

RowCount = RowCount + 1
Loop
End Sub


"Jim" wrote:

I have a list that looks like this:

10010 11221 102.00
102.00
102.00
10011 11247 103.50
103.50
103.50


The list goes on for thousands of rows. The columns are A, B and C.
I am trying unsucessfully to create a macro to autofill the first two
columns until the numbers change. In other words, 10010 would stop at
the last empty cell above 10011. It would repeat this all down the
page.

I am currently trying to count up from the bottom of the page...but I
don't know the code to loop the formula.

Thanks


Jim Cone[_2_]

Autofill to the last empty cell in a range
 

See John Walkenbach's clever, non vba, method...
http://spreadsheetpage.com/index.php...ies_in_a_list/
--
Jim Cone
Portland, Oregon USA



"Jim"
wrote in message
I have a list that looks like this:

10010 11221 102.00
102.00
102.00
10011 11247 103.50
103.50
103.50

The list goes on for thousands of rows. The columns are A, B and C.
I am trying unsucessfully to create a macro to autofill the first two
columns until the numbers change. In other words, 10010 would stop at
the last empty cell above 10011. It would repeat this all down the
page.
I am currently trying to count up from the bottom of the page...but I
don't know the code to loop the formula.
Thanks


All times are GMT +1. The time now is 11:44 AM.

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