Hi,
I have a set of columms, each containing formulas. I want to loop
through these and fill down each time. This is what I have at present:
Sub fillRecon()
Dim MY_COLUMN As Integer
LastRow = limit ' formula finding the number of rows in a
worksheet.
workBookS("Sample.xls").Sheets("RESULTS").Activate
For MY_COLUMN = 1 To Range("IV1").End(xlToLeft).Column
Range("a2").Offset(0, MY_COLUMN).Select
' Selection.AutoFill Destination:=Range(.Offset(0, MY_COLUMN)
' Selection.AutoFill Destination:=Range(Cells(2, MY_COLUMN)):
Range (Cells(LastRow, MY_COLUMN))
Next MY_COLUMN
End Sub
I get syntax errors from the commented out lines. I know you can
reference ranges with cells (which comes in handy with the MY_COLUMN
integer) but I can't get it to work.
I basically need a for loop that will do something like this:
' Sheets("RESULTS").Range("A2").Select
' Selection.AutoFill Destination:=Range("A2:A" & LastRow)
' Sheets("RESULTS").Range("B2").Select
' Selection.AutoFill Destination:=Range("B2:B" & LastRow)
' Sheets("RESULTS").Range("C2").Select
I would really appreciate it if someone can tell me what I am doing
wrong.
Cheers,
Skoobie
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
