twata701[Excel][VBA]VBAで特殊文字を扱うコメントを残すVBAで特殊文字を扱おうとしたところうまく行かなかった。©という文字、VBAのエディタ画面で入力すると「?」と表示されてしまう。変換してもコピペしても入力できない。調べた結果、ChrWというメソッドを使う必要があるらしい。*/)引数に文字コードを渡して文字を表す。ちなみにコピーライト「©」を表す文字コード(Unicode)は16進数でA9。&Hは16進数を表すとすればOK。twata701[Excel][VBA]複数のファイル、シートのヘッダー、フッターを一括で変更するマクロコメントを残すVBAからヘッダー、フッターを操作するには、シートオブジェクトのPageSetupオブジェクトを操作する。Sub指定したファイルの全シートに対して、フッターを差し替えなければ行けないということになったので、以下のようなマクロを作った。前提条件として、対象ファイルのフルパスを取得し、A列に入力してあるものとする。False'すべてのシートに対して操作を行う。仕事中に書いたExcelマクロをメモ。上下でセルを比較し、同じであれば色を付ける。このとき、連続する値が切り替わったとき、分かりやすいように赤と黄色で交互に色を付ける。処理後は以下のようになる。マクロ処理後aaaは連続するので黄色、その後bbbも連続しているが、上のaaaと区別しやすいように色を変える。cccは連続しないので色付けなし。色は黄色、赤と切り替えていく。("処理が完了しました。1).End(xlUp).row列Aを最終行からさかのぼって、最初に値がある行まで。これで途中が空白セルで抜けてても、最終行までチェックできる。