software

Can you change a massive amount of relative cells on one spread work sheet to
absolute without going into each cell and hitting F4?

Susan

By VBA only.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 SubSub AbsoluteRow()
Dim cell As Range
For Each cell In Selection
If cell.HasFormula Then
cell.Formula = Application.ConvertFormula(cell.Formula, _
xlA1, xlA1, xlAbsRowRelColumn)
End If
Next
End SubSub AbsoluteCol()
Dim cell As Range
For Each cell In Selection
If cell.HasFormula Then
cell.Formula = Application.ConvertFormula(cell.Formula, _
xlA1, xlA1, xlRelRowAbsColumn)
End If
Next
End SubSub Relative()
Dim cell As Range
For Each cell In Selection
If cell.HasFormula Then
cell.Formula = Application.ConvertFormula(cell.Formula, _
xlA1, xlA1, xlRelative)
End If
Next
End SubGord Dibben MS Excel MVP

On Mon, 6 Mar 2006 12:15:31 -0800, Susan A at Millennium Medical lt;Susan A at
Millennium gt; wrote:

gt;Can you change a massive amount of relative cells on one spread work sheet to
gt;absolute without going into each cell and hitting F4?

Gord Dibben MS Excel MVP

Gord,
Thank you very much!
Have a good day.
Susan.

quot;Susan A at Millennium Medicalquot; wrote:

gt; Can you change a massive amount of relative cells on one spread work sheet to
gt; absolute without going into each cell and hitting F4?

Thanks for the feedback. Always appreciated.

Gord

On Tue, 7 Mar 2006 04:11:27 -0800, Susan A at Millennium Medical omgt; wrote:

gt;Gord,
gt;Thank you very much!
gt;Have a good day.
gt;Susan.
gt;
gt;quot;Susan A at Millennium Medicalquot; wrote:
gt;
gt;gt; Can you change a massive amount of relative cells on one spread work sheet to
gt;gt; absolute without going into each cell and hitting F4?

Gord Dibben MS Excel MVP