Excelマクロを任意のワークシートで走らせるには

質問

ソーティングの一連の作業をマクロに記録して、別のワークシート上では走らせたら再現しませんでした。記録内容を確認すると、どうやらもともとの作業を記録したワークシートを指定しているようでした。
具体的には、以下の様なコマンドでワークシート「hogehoge01」が指定されているように思います。
ActiveWorkbook.Worksheets("hogehoge01").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("hogehoge01").Sort.SortFields.Add Key:=Range( _
"K2:K679"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal

実際には、hogehoge01をテンプレートにした別の任意のワークシートで走らせたいのですが、
なにか対策はありますでしょうか。
よろしくお願いします。

回答No.1

chie65536（@chie65535） · ベストアンサー

ActiveWorkbook.Worksheets("hogehoge01")
を
ActiveWorkbook.Activesheet
に書き換える。

お礼

ご返答遅くなってすみませんでした。
ご指示の内容に修正しましたところ、無事任意のファイル上で動作するようになりました。
大変助かりました。

回答No.2

m_and_dmp

記録マクロを作るとき、マクロの保存先がデフォルトで「作業中のブック」になっていますが、プルダウンメニューで、「個人用マクロブック」に変更します。それで、すべてのブックからマクロを実行することができるようになります。

または、VBE を開いた時、プロジェクトウインドウに「VBA Project (Personal.xls)」が存在するなら、そこに標準モジュールを追加し、マクロを作成したブックのコードを追加した標準モジュールにコピーします。
※Personal.xls　は拡張子がxls とは違う場合があります。

お礼

ご教示ありがとうございました。
マクロの保存先はご指摘のように「個人用マクロブック」を指定しておりましたが、作業を自動記録させたときにファイル名指定が挿入されてしまったのが問題だったようです。