• 追加された行はこの色です。
  • 削除された行はこの色です。
[[戻る>DoldoWorkz#Excel]]

PukiWikiを使ってはいますが&color(blue){''私(MoonDoldo)しか編集できない''};ようになっています。~

-[[Excelマクロ]]
#ls2(Excelマクロ/)

#hr

#contents

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

#hr

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

-[[Hard Day's Night (Hard Day's Night)>https://sites.google.com/site/mznetlab/]]~
--[[カラーパレットをリボンUIに配置 (Hard Day's Night)>https://sites.google.com/site/mznetlab/home/officedev/colorpalette/colorpalettepart1/colorpalettepart2]]~
--[[色が選択された時のコールバック関数 (Hard Day's Night)>https://sites.google.com/site/mznetlab/home/officedev/colorpalette/colorpalettepart1/colorpalettepart2/colorpalettepart3]]~

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

**ダウンロード [#r5504cd4]

-Excel2007アドイン ダウンロード~
使うだけの方はこちら~
#ref(XL2003ColorPallete2.xlam)

-Excel2007ソースファイル ダウンロード~
ソースコード・データ内容をを見たい方はこちら~
#ref(XL2003ColorPallete2.xlsm)

*概要と履歴 [#o9dfebce]

-OS~
Windows XP・7~
-その他条件~
Outlook2003・2007(Office2003・2007)~


&color(red){''2009/12/25修正''};
-複数のフォントの色が存在しているセルでも「元に戻す(Undo)」が使えるように修正
-「フォントの色(クラシック)」ボタンを押した際にエラーダイアログが出る可能性があったのを修正

&color(red){''2009/12/21～22修正''};
-セル内に複数のフォント色が設定されている判定に引っかかった際に実行キャンセルをしても、前回のUndoの内容がおかしくなってしまうバグを修正
-セルの内容保持の上限判定に引っかかった際に実行キャンセルをしても、前回のUndoの内容がおかしくなってしまうバグを修正

&color(red){''2009/12/20修正''};
-セルの内容保持の上限判定をするように修正、上限を超えた場合はUndoが出来ないメッセージを出す
-セル内に複数のフォント色が設定されている場合はUndoが出来ないメッセージを出す
** スクリーンショット [#ldc4de47]
-ホームの[フォント]の右横に[クラシック色]として配置されます~
#ref(XL2003ColorPallete2_1.jpg)~
　~
-プルダウンメニューでクラシックカラーパレットを選択出来ます~
#ref(XL2003ColorPallete2_2.jpg,around)
#ref(XL2003ColorPallete2_3.jpg)~
#img(,clear)~
　~
-通常、Excelでマクロを実行すると「元に戻す(Undo)」が消えてしまいます。~
ですが、このマクロでは実行する直前の状態(つまり1回だけ)元に戻せる様になっています。~
意外とこの部分は面倒で、作りながら「この部分作るのやめようかな…」と思ってしまいました(汗)~
#ref(XL2003ColorPallete2_4.jpg)~

**インストール方法 [#h2a38488]
特に特別な手順は無く、通常のアドオンを入れる方法何らと変わりません。~

+ファイルをダウンロードする
#ref(XL2003ColorPallete2.xlam)
+ダウンロードしたファイル[XL2003ColorPallete2.xlam]を以下の場所にコピーする
--Windows2000・XP
 C:\Documents and Settings\(ユーザー名)\Application Data\Microsoft\AddIns\
--Windows Vista
 C:\Users\(ユーザー名)\AppData\Roaming\Microsoft\AddIns\
+[Officeボタン](左上のアイコン)→[Excelのオプション]ボタンを押す
#ref(MacroInst1.jpg,,70%)
+「Excelのオプション」ウインドウの[アドイン]をクリック~
下の[管理]を「Excel アドイン」にし、[設定]ボタンを押す~
#ref(MacroInst2.jpg,,50%)
+「アドイン」ウインドウの[参照(B)]ボタンを押す~
※既に「XL2003ColorPallete2」が一覧にあるなら必要ありません~
#ref(MacroInst3.jpg)
+先ほどコピーした[XL2003ColorPallete2.xlam]を選択してOKを押す~
※既に「XL2003ColorPallete2」が一覧にあるなら必要ありません~
#ref(MacroInst4.jpg,,50%)
+XL2003ColorPallete2が表示され、チェックが付いている事を確認してOKを押す
#ref(MacroInst5.jpg)
+ホームの[フォント]の右横に[クラシック色]として配置されます
#ref(XL2003ColorPallete2_1.jpg)

**仕様(という言い訳) [#c9b8ffba]
以下の場合は「元に戻す(Undo)」が使えません。~
-32768セル以上に対して編集した場合~
-セル以外のオブジェクトを編集した場合（例えば図形）~

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