Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro to go to next blank cell in column
I've read what I could on this website, and in books, and I'm still a bit,
well, lost. Every week, I will be dumping data into a spreadsheet. Every week, it will be various lengths... One week 250 rows, the next 128, the next 372, etc. I am doing some other stuff with Macros, but I need to get the cursor to go to the FIRST blank cell in a column. If I'm not running a Macro, I would just type "Ctrl" + Down Arrow to get to the last FILLED ("Active"?) cell, and then would just Down-Arrow again to get to the blank one directly below. When I try to teach a Macro how to do this, it always remembers the SPECIFIC cell I chose, so it will either go to the middle of nowhere, or start overwriting in the table. (In other words - the three lists I mentioned above. Cell A251 would be the first blank in the first. What I want the Macro to do the following week is go to A129, and the following week A373. The best I've been able to do is get it to go to A251 EVERY FLIPPIN' TIME.) Please help. And please assume I am an absolute moron. If you just type something like "DIM.CELL ="9999" Plus.GoTo.ApplyDirectlyToTheForehead.ApplyDirectly ToTheForehead." .... I will be totally dumbfounded. Thanks! |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro to go to next blank cell in column
I assume you want to by-pass extraneous blanks and go to the first blank row
below all data. Easiest is to go to bottom of column then come back up from there. Sub findbottom() ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0).Select End Sub Or to set that cell as a range to copy to......... Set rng1 = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0) Gord Dibben MS Excel MVP On Tue, 27 Feb 2007 21:21:16 -0800, RJB wrote: I've read what I could on this website, and in books, and I'm still a bit, well, lost. Every week, I will be dumping data into a spreadsheet. Every week, it will be various lengths... One week 250 rows, the next 128, the next 372, etc. I am doing some other stuff with Macros, but I need to get the cursor to go to the FIRST blank cell in a column. If I'm not running a Macro, I would just type "Ctrl" + Down Arrow to get to the last FILLED ("Active"?) cell, and then would just Down-Arrow again to get to the blank one directly below. When I try to teach a Macro how to do this, it always remembers the SPECIFIC cell I chose, so it will either go to the middle of nowhere, or start overwriting in the table. (In other words - the three lists I mentioned above. Cell A251 would be the first blank in the first. What I want the Macro to do the following week is go to A129, and the following week A373. The best I've been able to do is get it to go to A251 EVERY FLIPPIN' TIME.) Please help. And please assume I am an absolute moron. If you just type something like "DIM.CELL ="9999" Plus.GoTo.ApplyDirectlyToTheForehead.ApplyDirectl yToTheForehead." ... I will be totally dumbfounded. Thanks! |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro to go to next blank cell in column
That first one worked perfectly.
If you have a moment, explain what each command is doing? Thank you "Gord Dibben" wrote: I assume you want to by-pass extraneous blanks and go to the first blank row below all data. Easiest is to go to bottom of column then come back up from there. Sub findbottom() ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0).Select End Sub Or to set that cell as a range to copy to......... Set rng1 = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0) Gord Dibben MS Excel MVP On Tue, 27 Feb 2007 21:21:16 -0800, RJB wrote: I've read what I could on this website, and in books, and I'm still a bit, well, lost. Every week, I will be dumping data into a spreadsheet. Every week, it will be various lengths... One week 250 rows, the next 128, the next 372, etc. I am doing some other stuff with Macros, but I need to get the cursor to go to the FIRST blank cell in a column. If I'm not running a Macro, I would just type "Ctrl" + Down Arrow to get to the last FILLED ("Active"?) cell, and then would just Down-Arrow again to get to the blank one directly below. When I try to teach a Macro how to do this, it always remembers the SPECIFIC cell I chose, so it will either go to the middle of nowhere, or start overwriting in the table. (In other words - the three lists I mentioned above. Cell A251 would be the first blank in the first. What I want the Macro to do the following week is go to A129, and the following week A373. The best I've been able to do is get it to go to A251 EVERY FLIPPIN' TIME.) Please help. And please assume I am an absolute moron. If you just type something like "DIM.CELL ="9999" Plus.GoTo.ApplyDirectlyToTheForehead.ApplyDirectl yToTheForehead." ... I will be totally dumbfounded. Thanks! |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
Macro to go to next blank cell in column
ActiveSheet.Cells(Rows.Count, 1) finds the bottom of Column 1(A) which is
A66536 Sub findbottom2() Dim rng As Range Set rng = ActiveSheet.Cells(Rows.Count, 1) MsgBox rng.Address End Sub Then the End(xlUp) comes back up to last used cell in Column 1 Sub findbottom3() Dim rng As Range Set rng = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) MsgBox rng.Address End Sub The Offset(1, 0) selects the cell below last filled cell. Sub findbottom4() Dim rng As Range Set rng = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ ..Offset(1, 0) MsgBox rng.Address End Sub Gord On Tue, 27 Feb 2007 22:05:05 -0800, RJB wrote: That first one worked perfectly. If you have a moment, explain what each command is doing? Thank you "Gord Dibben" wrote: I assume you want to by-pass extraneous blanks and go to the first blank row below all data. Easiest is to go to bottom of column then come back up from there. Sub findbottom() ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0).Select End Sub Or to set that cell as a range to copy to......... Set rng1 = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0) Gord Dibben MS Excel MVP On Tue, 27 Feb 2007 21:21:16 -0800, RJB wrote: I've read what I could on this website, and in books, and I'm still a bit, well, lost. Every week, I will be dumping data into a spreadsheet. Every week, it will be various lengths... One week 250 rows, the next 128, the next 372, etc. I am doing some other stuff with Macros, but I need to get the cursor to go to the FIRST blank cell in a column. If I'm not running a Macro, I would just type "Ctrl" + Down Arrow to get to the last FILLED ("Active"?) cell, and then would just Down-Arrow again to get to the blank one directly below. When I try to teach a Macro how to do this, it always remembers the SPECIFIC cell I chose, so it will either go to the middle of nowhere, or start overwriting in the table. (In other words - the three lists I mentioned above. Cell A251 would be the first blank in the first. What I want the Macro to do the following week is go to A129, and the following week A373. The best I've been able to do is get it to go to A251 EVERY FLIPPIN' TIME.) Please help. And please assume I am an absolute moron. If you just type something like "DIM.CELL ="9999" Plus.GoTo.ApplyDirectlyToTheForehead.ApplyDirectl yToTheForehead." ... I will be totally dumbfounded. Thanks! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Last non-blank cell in a column | Excel Discussion (Misc queries) | |||
Ending a macro early conditionally on one cell being blank | Excel Discussion (Misc queries) | |||
sum using or (if Blank cell in Column) | New Users to Excel | |||
macro to hide rows if cell is blank | Excel Worksheet Functions | |||
Value of last non-blank cell in a column | Excel Worksheet Functions |