文字列として作成した関数を、関数として機能させたい

質問

いつも当コーナーを活用させていただいており、ありがとうございます。
通常は文字列を操作して作成した関数 ('=で始まる文字列) を、正規の関数として機能させるために、(1)F2キーで編集(2)エンターキー　とするか、先頭の　'　を消去して来ました。
個数が多くなると大変になりました。何かほかの手立てをご教授願いたいのですが。

回答No.4

NotFound404

マクロでもよろしければ
Alt + F11 を押してVBEの画面にします。
メニューの「挿入」から「標準モジュール」選びます。
新しいウィンドウが出ますので下記をコピペ。

Sub DoFormula()
'PrefixCharacter を削除します
　　Dim r As Range
　　For Each r In Selection
　　　　r.Formula = r.Formula
　　Next
End Sub

Sub DoNotFormula()
'PrefixCharacter を追加します
　　Dim r As Range
　　For Each r In Selection
　　　　If r.HasFormula Then
　　　　　　r.Formula = "'" & r.Formula
　　　　End If
　　Next
End Sub

Alt + F4 でVBEを閉じます。
Excelの画面に戻るので、『'』を取り去りたいところを選択状態にします。
Alt + F8 または
リボンの表示タブのマクロをクリックすると
先ほどのDoFormula と DoNotFormula がありますから
DoFormulaをクリック後に「実行」をクリックしてみてください。
ファイルを保存する際にはマクロ有効ブック（xlsm）か xls にしてください。
以上ご参考まで。

お礼

早速のご回答ありがとうございます。
単純にマクロをコピペし、実行したのみでミスがあるかもわかりませんが、今のところ状態は変わりませんでした。後刻確かめてみます。
とりあえずお礼まで。