〈Word〉VBAマクロの使い方(勉強中のメモです)

アルファベットを全角に変換したくて、VBAマクロに挑戦中です。

Visual Basicをクリック↓

「標準モジュール」を選び↓

白い空欄にコードをコピー。

左上のマークをクリックします。

試しに、

【1行マクロ】半角←→全角文字変換 | 特許翻訳 A to Z」を参考に

Sub zenkaku()
ActiveDocument.Range.CharacterWidth = wdWidthFullWidth
End Sub

をコピペしました。

実行したら↓

本一冊分のすべてのアルファベットが全角になりました。

大成功!

でも、これだとダメだと思うんですよね〜。

Excel VBAの変数を宣言する方法:Dim | UX MILK」を読んでみたいけど、理解できず。

ここまで〜


一度は諦めたのですが、下の記事を見つけて

コンパイルエラーと言われてしまいました。

あ、そうか、選択範囲を指定していないからか、と思ったんだけど

文字を選択しても、コンパイルエラーです。

どうして?

〈Word〉作成したマクロを全文書対象のテンプレートにする(構成内容変更)

これが正しいかどうかはわからないのですが、いろいろ試した結果です。

構成内容変更をクリックし↓

コピー元の「NewMacros」を削除し↓

NewMacrosをコピーします。

よくわかりませんが、これでオリジナルのマクロを使うことができました。


オリジナルのマクロは、下の検索と置換です。

(半角)→(全角)
<><>→〈〉
“”→〝〟
半角の!と?は→全角の!と?に
全角の!?は→半角の!?
/→/
%→%
&→&
半角の+-=は→全角の+−=
 行頭のスペース全角1つを削除する ^P^W→^P
  行頭のスペース全角2つを削除する
   行頭のスペース全角3つを削除する
_行頭のスペース半角1つを削除する^P^W→^P
__行頭のスペース半角2つを削除する
___行頭のスペース半角3つを削除する