Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Selection AutoFill, Excel 2000 & 2003
Hello,
I have multiple worksheets that I need to add numbers to cells incrementing them by 1 to multiple columns but I was wondering how you can get the Selection.AutoFill to begin with 21 in A1 and stop at 3500. This is the code i've got so far but you have to manually put the destination cell in I would like to automatically stop? Range("A1").Select ActiveCell.FormulaR1C1 = "31" Range("A2").Select ActiveCell.FormulaR1C1 = "32" Range("A1:A2").Select Selection.AutoFill Destination:=Range("A:A"), Type:=xlFillDefault Thank you for your help, jfcby |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Selection AutoFill, Excel 2000 & 2003
hi,
Try this code.... Range("A1").FormulaR1C1 = "31" Range("A2").FormulaR1C1 = "32" Range("A3").FormulaR1C1 = "33" Range("A1:A3500").Select 'Selects the range Selection.DataSeries _ Rowcol:=xlColumns, _ Type:=xlLinear, _ Step:=1, _ Stop:=3500 'Where to stop Regards FSt1 "James Cooper" wrote: Hello, I have multiple worksheets that I need to add numbers to cells incrementing them by 1 to multiple columns but I was wondering how you can get the Selection.AutoFill to begin with 21 in A1 and stop at 3500. This is the code i've got so far but you have to manually put the destination cell in I would like to automatically stop? Range("A1").Select ActiveCell.FormulaR1C1 = "31" Range("A2").Select ActiveCell.FormulaR1C1 = "32" Range("A1:A2").Select Selection.AutoFill Destination:=Range("A:A"), Type:=xlFillDefault Thank you for your help, jfcby |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel 2003 FAILS, but Excel 2000 SUCCEEDS ??? | Excel Discussion (Misc queries) | |||
Using Excel 2000 VBA Application on Excel 2003 | Excel Worksheet Functions | |||
Upgrade from Excel 2000 to Excel 2003 without MS Office 2003? | Excel Discussion (Misc queries) | |||
Hyperlinks from Excel 2000 dont work anymore in Excel 2003 | Excel Discussion (Misc queries) | |||
Excel 2003 crashes loading excel files created Excel 2000 | Excel Discussion (Misc queries) |