Autocopy formula

[Joey123]

Can anyone please provide the code used which allows excel to autocopy a formula down a column to the point of the last entry in the preceding column.

Many thanks,

[shg]

Never tried it, but maybe this:

Please Login or Register  to view this content.

[Joey123]

It doesn't like that formula....

I know it's close though because I did see one written before but can't remember where.

[shg]

It likes this one:

Please Login or Register  to view this content.

[Joey123]

Hi

Thanks, that worked ok...but...

Is there a way to change the Range Selection from a specific cell i.e. C2, to whatever cell is selected in the worksheet, with the autofill proceeding from there? Also, how can the Macro be adapted to allow the autofill to proceed to the last row, even if there are any blank cells in some of the rows above within the preceding column?

The code is shown below.

Thanks,

Sub ConfigureCaseSize()
'
' ConfigureCaseSize Macro
' Determines Case Size from the pack size
'
' Shortcut CTRL+Shift+P
'
Range("c2").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-1]=6,""2 x 3"",IF(RC[-1]=12,""3 x 4"",""Amend""))"
ActiveCell.AutoFill Range(ActiveCell, ActiveCell.Offset(, -1).End(xlDown).Offset(, 1))
End Sub

[Joey123]

Bump

Any suggestions anyone...?