Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
hi all !!!
i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
I think this is what you mean
aWS.Range("E80:L80").Copy aWS.Range("E82").Resize(100).Insert Shift:=xlDown -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "N+" wrote in message ... hi all !!! i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
If you really need to shift existing content downward, then this should do
what you asked... Range("E80:L80").Copy Range("E82").resize(300).Insert Shift:=xlDown However, if there is no existing data that needs to be preserved in the target area, then you could do this instead... Range("E80:L80").Copy Range("E82").Resize(300) Rick "N+" wrote in message ... hi all !!! i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
YES TY AGAIN BOB !!
if i will have any result i will not forget you for the timer sub !! byy "Bob Phillips" wrote: I think this is what you mean aWS.Range("E80:L80").Copy aWS.Range("E82").Resize(100).Insert Shift:=xlDown -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "N+" wrote in message ... hi all !!! i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
hi rick i need the content to be "stored " down there !!
ty for the example "Rick Rothstein (MVP - VB)" wrote: If you really need to shift existing content downward, then this should do what you asked... Range("E80:L80").Copy Range("E82").resize(300).Insert Shift:=xlDown However, if there is no existing data that needs to be preserved in the target area, then you could do this instead... Range("E80:L80").Copy Range("E82").Resize(300) Rick "N+" wrote in message ... hi all !!! i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
multiple Insert Shift:=xlDown
Rick, how would I apply the resize property in my following situation?
I have sets of data in blocks of three vertical cells (A1:A3, B1:B3, C1:C3, A4:A6, B4:B6...................). I need to shift them as many blocks as the user indicated starting from left to right and then when column C is reched downbelow to the nex available row, something like this 123 456 789 would look like this if shifted two blocks 1 234 567 89 Thanks in advance "Rick Rothstein (MVP - VB)" wrote: If you really need to shift existing content downward, then this should do what you asked... Range("E80:L80").Copy Range("E82").resize(300).Insert Shift:=xlDown However, if there is no existing data that needs to be preserved in the target area, then you could do this instead... Range("E80:L80").Copy Range("E82").Resize(300) Rick "N+" wrote in message ... hi all !!! i just need to write down my code so to make 300 times the next command.. or to insert 300 times a void line ( dimension e80:l80 ) in e 82 : aWS.Range("E80:L80").Copy aWS.Range("E82").Insert Shift:=xlDown let me know pls if you have any idea !! byy! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
insert cell content and shift cells down | Excel Worksheet Functions | |||
I want to align two columns by using insert/shift down | Excel Worksheet Functions | |||
VSTO column insert shift to right | Excel Programming | |||
expression.Insert(Shift, CopyOrigin) ? | Excel Programming |