Hi all,
Here is my problem:
I am trying to loop through a number of columns and in each column autofill down. Here is the code I am trying to use
This doesn't work !! I have tried to address the columns and everything...Now starting to bang head against a wall !!Code:for i = 1 to Nocards TopCell = cells(rowcount, i + 1).address Bottomcell = cells(rowcount + 1, i + 1).address Insert_which = Topcell & ":" & Bottomcell Range(Insert_which).select selection.Autofill Destination:=Range(Insert_Which), Type:=Xlfilldefault next i
Anybody got any ideas on a better way or some way to modify the above code. Using the columns property returns a number and not the corresponding letter i.e.
returns a 2, and not BCode:TopCell = cells(rowcount, i + 1).column
Please help !! Any ideas greatly welcomed
Steve





Reply With Quote