戻る

目次

クラシック色カラーパレット

#ref(): File not found: "XL2003ColorPallete2_1.jpg" at page "Excelマクロ/クラシック色カラーパレット"

Excel2007・Excel2010βで、Excel2003以前で使われていたクラシック色が扱えるマクロ(アドイン)です。
「塗りつぶしの色」と「フォントの色」に対応しています。
通常、Excelでマクロを実行すると「元に戻す(Ctrl+Z)」が消えてしまうのですが、このマクロでは実行する直前の状態(つまり1回だけ)元に戻せる様になっているのが特徴です。


このマクロの大部分は下記サイト「Hard Day's Night」の管理者である「okey-doke」さんが作成された物です。
このような有用なソフトを作っていただき、ありがとうございます。
これに、私が少々改造した物を公開しても良いか聞いたところ、快く許可をしていただきました、ありがとうございます。

okey-dokeさんのサイトはExcel2007のマクロ作成方法について丁寧に解説が載っているので、自分でマクロを作りたい方必見のブログとなっています。

ダウンロード

  • Excel2007 アドイン ダウンロード
    ※セル・図形・ワードアート・図・クリップアート・テキストボックスが1回だけの「元に戻す(Ctrl+Z)」に対応しています

    #ref(): File not found: "XL2003ColorPallete3_xlam.zip" at page "Excelマクロ/クラシック色カラーパレット"

  • Excel2007 アドイン 旧バージョンダウンロード (安定版)
    ※セルのみ、1回だけの「元に戻す(Ctrl+Z)」に対応しています

    #ref(): File not found: "XL2003ColorPallete2_xlam.ZIP" at page "Excelマクロ/クラシック色カラーパレット"

詳細および要件

  • OS
    Windows XP・Vista・7
  • その他条件
    Excel2007・2010
  • 利用条件
    誰でも無料でお使い頂けます(もちろん企業内でもご自由にお使い頂けます)

窓の杜に紹介記事が載りました
窓の杜 - 【REVIEW】Excel 2003の塗りつぶし色をExcel 2007/2010でも「クラシック色カラーパレット」

スクリーンショット

  • ホームの[フォント]の右横に[クラシック色]として配置されます

    #ref(): File not found: "XL2003ColorPallete2_1.jpg" at page "Excelマクロ/クラシック色カラーパレット"

     
  • プルダウンメニューでクラシックカラーパレットを選択出来ます

    #ref(): File not found: "XL2003ColorPallete2_2.jpg" at page "Excelマクロ/クラシック色カラーパレット"

    #ref(): File not found: "XL2003ColorPallete2_3.jpg" at page "Excelマクロ/クラシック色カラーパレット"

    #img(): File not found:  
  • 通常、Excelでマクロを実行すると「元に戻す(Ctrl+Z)」が消えてしまいます。
    ですが、このマクロでは実行する直前の状態(つまり1回だけ)元に戻せる様になっています。
    意外とこの部分は面倒で、作りながら「この部分作るのやめようかな…」と思ってしまいました(汗)

    #ref(): File not found: "XL2003ColorPallete2_4.jpg" at page "Excelマクロ/クラシック色カラーパレット"

インストール方法

特に特別な手順は無く、通常のアドオンを入れる方法何らと変わりません。

  1. ファイルをダウンロードする
  2. ダウンロードされたファイル[XL2003ColorPallete3_xlam.ZIP]を解凍する。
  3. 解凍されたファイル[XL2003ColorPallete3.xlam]を以下の場所にコピーする
    • Windows2000・XP
      C:\Documents and Settings\(ユーザー名)\Application Data\Microsoft\AddIns\
    • Windows Vista・7
      C:\Users\(ユーザー名)\AppData\Roaming\Microsoft\AddIns\
  4. [Officeボタン](左上のアイコン)→[Excelのオプション]ボタンを押す

    #ref(): File not found: "MacroInst1.jpg" at page "Excelマクロ/クラシック色カラーパレット"

  5. 「Excelのオプション」ウインドウの[アドイン]をクリック
    下の[管理]を「Excel アドイン」にし、[設定]ボタンを押す

    #ref(): File not found: "MacroInst2.jpg" at page "Excelマクロ/クラシック色カラーパレット"

  6. 「アドイン」ウインドウの[参照(B)]ボタンを押す
    ※既に「XL2003ColorPallete3」が一覧にあるなら必要ありません

    #ref(): File not found: "MacroInst3.jpg" at page "Excelマクロ/クラシック色カラーパレット"

  7. 先ほどコピーした[XL2003ColorPallete3.xlam]を選択してOKを押す
    ※既に「XL2003ColorPallete3」が一覧にあるなら必要ありません

    #ref(): File not found: "MacroInst4.jpg" at page "Excelマクロ/クラシック色カラーパレット"

  8. XL2003ColorPallete3が表示され、チェックが付いている事を確認してOKを押す

    #ref(): File not found: "MacroInst5.jpg" at page "Excelマクロ/クラシック色カラーパレット"

  9. [ホーム]タブ内の[フォント]の右横に[クラシック色]として配置されます

    #ref(): File not found: "XL2003ColorPallete2_1.jpg" at page "Excelマクロ/クラシック色カラーパレット"

仕様(という言い訳)

以下の場合は「元に戻す(Ctrl+Z)」が使えません

  • 32768セルorオブジェクト以上に対して編集した場合
  • セル・図形・ワードアート・図・クリップアート・テキストボックス以外のオブジェクトを編集した場合
  • ワークシート内に同じ名前の図形・ワードアート・図・クリップアート・テキストボックスを編集した場合
    ※確認されているのは、クリップアートを複製すると同じ名前の図形が出来てしまいます

以上の条件の場合は、実行前に「実行後元に戻せなくなります」というダイアログが出ます。
そのダイアログで実行をキャンセルする事も出来、その場合は「元に戻す(Ctrl+Z)」が消える事はありません。

以下の場合は「元に戻す(Ctrl+Z)」を使っても元に戻りません

  • 「グラデーション」・「図またはテクスチャ」等の特殊な塗りつぶしがあるセルを編集した場合
    「元に戻す(Ctrl+Z)」を使うと、白色で塗りつぶされて戻されます
    実行前の事前警告も出ません
    事前に「グラデーション」・「図またはテクスチャ」が使われているかを調べる方法が見つからないのでこの様な残念な仕様となってます…知っている方はぜひ情報を下さい [worried]

特殊な起動をしているExcelで表示されない

通常使っている分にはこの問題は起きません。
ExcelOLE(ActiveX)をコントロールし、マクロを停止して開かれた場合に非表示となります。
解決策としては、Excelを起動し直せば戻りますが、まれにこれでも戻らない事があります。
その場合、バックグラウンドでExcelが起動しっぱなしになっていますので、以下の手順でExcelを終了させて下さい。

  1. タスクバーを右クリック
  2. [タスク マネージャ(K)] をクリック
  3. [プロセス]タブをクリック
  4. 「EXCEL.EXE」を右クリック
  5. [プロセスの終了(E)]をクリック

履歴

2011/1/2修正

  • 図形・ワードアート・図・クリップアート・テキストボックスで「元に戻す(Ctrl+Z)」を使えるようにする ただし、ワークシート内に同じ名前の図形がある場合元に戻せません(確認されているのは、クリップアートを複製すると同じ名前の図形が出来てしまいます)

2010/1/17修正(安定版)

  • 「元に戻す(Ctrl+Z)」処理で32767セルを変更した場合だけ、内部のカウンタがオーバーフローを起こしていた。
    特にほおっておいても問題ない場所だったが、念のため修正。
  • 旧バージョンダウンロード

    #ref(): File not found: "XL2003ColorPallete2_xlam.ZIP" at page "Excelマクロ/クラシック色カラーパレット"

2010/1/12修正

  • Internet Explorerでダウンロードした際に、拡張子がzipに化ける現象が起きていました。
    そうならない様にアーカイブしたファイルを置きました(中身のマクロに変更はありません)

2009/12/25修正

  • 複数のフォントの色が存在しているセルでも「元に戻す(Ctrl+Z)」が使えるように修正
  • 「フォントの色(クラシック)」ボタンを押した際にエラーダイアログが出る可能性があったのを修正

2009/12/21~22修正

  • セル内に複数のフォント色が設定されている判定に引っかかった際に実行キャンセルをしても、「元に戻す(Ctrl+Z)」の内容がおかしくなってしまうバグを修正
  • セルの内容保持の上限判定に引っかかった際に実行キャンセルをしても、「元に戻す(Ctrl+Z)」の内容がおかしくなってしまうバグを修正

2009/12/20修正

  • セルの内容保持の上限判定をするように修正、上限を超えた場合は「元に戻す(Ctrl+Z)」が出来ないメッセージを出す
  • セル内に複数のフォント色が設定されている場合は「元に戻す(Ctrl+Z)」が出来ないメッセージを出す