スタイル/名前を一括削除

シートやブック間でのセルのコピーを繰り返していると、名前やスタイルもコピーされてどんどん増殖していきます。
こつこつ削除していけばすむ話ではありますが、ブックの数が多い場合は大変です。

ここでは、VBScriotファイルに対象のブックをドロップするだけで、名前やユーザー定義のスタイル削除する仕掛けを作ります。

メニュー
使用方法
プログラムの処理
スタイル削除VBScriptコード
名前削除のVBScriptコード

スタイル削除スクリプトのダウンロード
スタイル削除スクリプトのダウンロード

リンクリスト



使用方法

下記の手順

1.対象のブックをまとめて「delete-style.vbs」の上にドラッグ&ドロップします。



2.確認メッセージが表示されますので「OK」をクリックすると処理開始。

  「キャンセル」で処理を中止。




3.処理が終わると、終了メッセージが表示されます。



プログラムの処理

処理自体はシンプル。

16: ドロップされたファイル名を順次取り出します。
   パラメータとして、WScript.Arguments の配列で渡されるので、
   For Each In 〜 でファイル名(パス含む)を取り出し、
18: ファイル(ブック)を開きます。
20: すべてのスタイルを処理
21: 既定値(BuiltIn)以外であれば、
22: 削除(Delete)

24: すべてのスタイルについて繰り返す
30: すべファイル(ブック)について繰り返す

スタイル削除のVBScriptコード

22行目が削除処理

名前削除のVBScriptコード

スタイル削除とほとんど同一のコード
20行目が削除処理


名前削除スクリプトのダウンロード





×
PageTop