[[Excelマクロ]]

[[戻る>DoldoWorkz#Excel]]

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

*Excelマクロ [#q4a35414]

#hr
#contents
#hr

* クラシック色カラーパレット(XL2003ColorPallete2) [#e488d070]
&color(blue){''Excel2007でクラシック色が扱える''};マクロです。~

&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のマクロ作成方法について丁寧に解説が載っている''};ので、自分でマクロを作りたい方必見のブログとなっています。~

-Excel2007アドイン ダウンロード &color(red){''※使うだけの方はこちら''};
#ref(XL2003ColorPallete2.xlam)

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

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

&color(red){''2009/12/20修正''};
-セルの内容保持の上限判定をするように修正、上限を超えた場合はUndoが出来ないメッセージを出す
-セル内に複数のフォント色が設定されている場合はUndoが出来ないメッセージを出す
** スクリーンショット [#ldc4de47]
-ホームの[フォント]の右横に[クラシック色]として配置されます~
#ref(XL2003ColorPallete2_1.jpg)~
　~
-プルダウンメニューでカラーパレットを選択します~
#ref(XL2003ColorPallete2_2.jpg,around)
#ref(XL2003ColorPallete2_3.jpg)~
#img(,clear)~
　~
-このマクロを実行する直前の状態(つまり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(MacroInst6.jpg)