| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Select range
Hi,
Is there an addition to the code; Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select so that if there is just 1 blanco row or column included (range is A:G, column B is blanco) columns C:G are included?! |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Select range
Set LastRow = Cells(Rows.Count,Selection.Column).end(xlup)
Set LastCell = LastRow.End(xltoright) Set FirstCell = LastRow.end(xlup) Range(FirstCell,LastCell).select "Basta1980" wrote: Hi, Is there an addition to the code; Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select so that if there is just 1 blanco row or column included (range is A:G, column B is blanco) columns C:G are included?! |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Select range
Hi Joel,
Thanx for the tip, but excel still doesnt jump over the blanco column so that columns C:G are also included in the selection. "Joel" wrote: Set LastRow = Cells(Rows.Count,Selection.Column).end(xlup) Set LastCell = LastRow.End(xltoright) Set FirstCell = LastRow.end(xlup) Range(FirstCell,LastCell).select "Basta1980" wrote: Hi, Is there an addition to the code; Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select so that if there is just 1 blanco row or column included (range is A:G, column B is blanco) columns C:G are included?! |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Select range
Set LastRow = Cells(Rows.Count,Selection.Column).end(xlup) Set LastCell = Cells(LastRow,Columns.Count).End(xltoleft) Set FirstCell = LastRow.end(xlup) Range(FirstCell,LastCell).select "Basta1980" wrote: Hi Joel, Thanx for the tip, but excel still doesnt jump over the blanco column so that columns C:G are also included in the selection. "Joel" wrote: Set LastRow = Cells(Rows.Count,Selection.Column).end(xlup) Set LastCell = LastRow.End(xltoright) Set FirstCell = LastRow.end(xlup) Range(FirstCell,LastCell).select "Basta1980" wrote: Hi, Is there an addition to the code; Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select so that if there is just 1 blanco row or column included (range is A:G, column B is blanco) columns C:G are included?! |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How can change range to select active rows instead of :=Range("S10 | Excel Discussion (Misc queries) | |||
| macro to select range from active cell range name string | Excel Programming | |||
| When entering data into a range of cells, select the entire range. | Excel Discussion (Misc queries) | |||
| Compare a selected Range with a Named range and select cells that do not exist | Excel Programming | |||
| Select Sheet then Select Range | Excel Programming | |||
Hybrid Mode
