Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Virtual Row Selection
I'm in a With statement and I'm trying to select one more rows depending on
the value of my variables. For example, say Checkrow = 4 AddRow = 2 I want to insert 2 rows below row 4 this is what I'm trying: ..Rows((CheckRow + 1):(CheckRow + 1 + AddRow - 1)).Select Selection.Insert Shift:=xlDown This would be the same as: Rows("3:4").Select Selection.Insert Shift:=xlDown but I'm getting a compile error: expected list separator or ) How do I make this work? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Virtual Row Selection
I'm pretty sure this will do what you want...
Checkrow = 4 AddRow = 2 Rows(CheckRow + 1).Resize(AddRow).Insert Shift:=xlShiftDown -- Rick (MVP - Excel) "Bishop" wrote in message ... I'm in a With statement and I'm trying to select one more rows depending on the value of my variables. For example, say Checkrow = 4 AddRow = 2 I want to insert 2 rows below row 4 this is what I'm trying: .Rows((CheckRow + 1):(CheckRow + 1 + AddRow - 1)).Select Selection.Insert Shift:=xlDown This would be the same as: Rows("3:4").Select Selection.Insert Shift:=xlDown but I'm getting a compile error: expected list separator or ) How do I make this work? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Virtual Row Selection
VBE didn't recognize Shift:=xlShiftDown but I read the helpfile and this
worked: Rows(CheckRow + 1).Resize(AddRow).Insert(xlShiftDown) But this is perfect! Exactly what I needed. Thanks. "Rick Rothstein" wrote: I'm pretty sure this will do what you want... Checkrow = 4 AddRow = 2 Rows(CheckRow + 1).Resize(AddRow).Insert Shift:=xlShiftDown -- Rick (MVP - Excel) "Bishop" wrote in message ... I'm in a With statement and I'm trying to select one more rows depending on the value of my variables. For example, say Checkrow = 4 AddRow = 2 I want to insert 2 rows below row 4 this is what I'm trying: .Rows((CheckRow + 1):(CheckRow + 1 + AddRow - 1)).Select Selection.Insert Shift:=xlDown This would be the same as: Rows("3:4").Select Selection.Insert Shift:=xlDown but I'm getting a compile error: expected list separator or ) How do I make this work? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Virtual Row Selection
Odd, the line of code that I posted worked fine (I tested it before I posted
it)... did you copy it exactly as I wrote it? Your version also works on my system, so you might as well use it. I'd be curious at to why what I posted originally didn't work for you. -- Rick (MVP - Excel) "Bishop" wrote in message ... VBE didn't recognize Shift:=xlShiftDown but I read the helpfile and this worked: Rows(CheckRow + 1).Resize(AddRow).Insert(xlShiftDown) But this is perfect! Exactly what I needed. Thanks. "Rick Rothstein" wrote: I'm pretty sure this will do what you want... Checkrow = 4 AddRow = 2 Rows(CheckRow + 1).Resize(AddRow).Insert Shift:=xlShiftDown -- Rick (MVP - Excel) "Bishop" wrote in message ... I'm in a With statement and I'm trying to select one more rows depending on the value of my variables. For example, say Checkrow = 4 AddRow = 2 I want to insert 2 rows below row 4 this is what I'm trying: .Rows((CheckRow + 1):(CheckRow + 1 + AddRow - 1)).Select Selection.Insert Shift:=xlDown This would be the same as: Rows("3:4").Select Selection.Insert Shift:=xlDown but I'm getting a compile error: expected list separator or ) How do I make this work? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
VBA for Virtual Earth | Excel Programming | |||
Virtual Clock | Excel Worksheet Functions | |||
Virtual PC | Setting up and Configuration of Excel | |||
Virtual AutoFill Macro | Excel Programming | |||
Tracking Virtual Memory | Excel Programming |