Changing many cells from absolute reference to relative

W

Woody13

Yesterday I changed all the formulas from relative to absolute references and
now I need to change them back. I used this macro to make them absolute.
Sub Absolute()
Dim cell As Range
For Each cell In Selection
If cell.HasFormula Then
cell.Formula = Application.ConvertFormula(cell.Formula, _
xlA1, xlA1, xlAbsolute)
End If
Next
End Sub
 
W

Woody13

I simply changed "Absolute" to "Relative" in the convert formula and it
worked. Thanks
 
G

Gord Dibben

Woody

Yesterday I gave you four macros.

Use the Relative one.

Gord Dibben Excel MVP
 
Top