2009-10-25 01:07:22 (Sun)


  1. Visual Basic Editor で以下のソースコードを記述。
  2. 置換したセルを選択して、マクロを実行。

Sub ReplaceReferenceToAbsolute()
Dim myCell As Range
For Each myCell In Selection
If myCell.HasFormula Then
myCell.Formula = Application.ConvertFormula( _
Formula:=myCell.Formula, _
fromReferenceStyle:=xlA1, _
toAbsolute:=xlAbsolute)
End If
Next
End Sub
最終更新:2009年10月25日 01:07