Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting range to last occupied cell
I want to copy a range going from a known cell, say D4, to the last occupied
cell in column G. I have been given the following as a suggestion to find the last occupied row in a column, but how do I use that in a range statement in vba? lastrow = Cells(Cells.Rows.Count, "G").End(xlUp).Row Also will this only find the last contiguously occupied row (if that's the right word). ie will it ignore an empty row before the row containing column totals which I don't want to include in the range. Is there a better solution? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting range to last occupied cell
lastrow = Cells(Cells.Rows.Count, "G").End(xlUp).Row equal to: lastrow = Cells(65536, "G").End(xlUp).Row in vba: = Range("G65536").End(xlUp).Row as it start counting from G65536 till up and reach an End, just like you press "End" then "Up Arrow" key. for other range, just change the colume letter for the range. "Ken G" wrote: I want to copy a range going from a known cell, say D4, to the last occupied cell in column G. I have been given the following as a suggestion to find the last occupied row in a column, but how do I use that in a range statement in vba? lastrow = Cells(Cells.Rows.Count, "G").End(xlUp).Row Also will this only find the last contiguously occupied row (if that's the right word). ie will it ignore an empty row before the row containing column totals which I don't want to include in the range. Is there a better solution? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting range to last occupied cell
Try
Dim rngTemp As Range Set rngTemp = Range("G1", Range("G1").End(xlDown)) MsgBox rngTemp.Address -- Jacob "Ken G" wrote: I want to copy a range going from a known cell, say D4, to the last occupied cell in column G. I have been given the following as a suggestion to find the last occupied row in a column, but how do I use that in a range statement in vba? lastrow = Cells(Cells.Rows.Count, "G").End(xlUp).Row Also will this only find the last contiguously occupied row (if that's the right word). ie will it ignore an empty row before the row containing column totals which I don't want to include in the range. Is there a better solution? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
newbie - how to paste into an occupied cell | New Users to Excel | |||
Selecting occupied cell over empty ones | Excel Discussion (Misc queries) | |||
Selecting occupied cell over empty ones | Excel Discussion (Misc queries) | |||
subtract from numeric cell when alpha cell is occupied | Excel Worksheet Functions | |||
Selecting occupied cell over empty ones | Excel Discussion (Misc queries) |