Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


29263 / 76738 ←次へ | 前へ→

【52758】Re:カラーパレットの使用方法
発言  ichinose  - 07/12/1(土) 17:54 -

引用なし
パスワード
   こんばんは。

>しかしながら
>Sub test2()
>With Range("A15:B15").Interior
>If Application.Dialogs(xlDialogEditColor).Show(2) Then
>    .ColorIndex = 2           '~~~~
>End If       '~~~~
>End Sub
>
>~~~~の部分を1から2に変更するとtest1に影響を及ぼさない(絡まない)
>単独の動作=つまりA15:B15に色指定が出来ます。ですから
>このコードの中のColorIndex=2は色指定の意味では無いと
>判断したらよいのでしょうか。
横入りさんの説明で十分だと思いますが、ちょっとだけ。

パレットって、実際には

store.shopping.yahoo.co.jp/inobun/013825.html#

↑こんな道具ですよね!!

この写真のパレットは、12色の色を一度に置けるのですよね?

Excelは、56色置けます。Colorindexは、この色の置く場所を示す番号です。

Application.Dialogs(xlDialogEditColor).Show(2)

は、パレット番号2の色を現在の色から、自由に変更してください
というメソッドです。

ですから、特別な色を作成したいなら、現在パレット上にあるどれか色と交換する
ことになります。

Show(n)やColorindex=n、このnは、色のある場所を示す識別番号です。

いかがでしょうか?

0 hits

【52681】カラーパレットの使用方法 美貴 07/11/26(月) 11:45 質問
【52683】Re:カラーパレットの使用方法 じゅんじゅん 07/11/26(月) 12:46 発言
【52684】Re:カラーパレットの使用方法 美貴 07/11/26(月) 13:06 発言
【52685】Re:カラーパレットの使用方法 じゅんじゅん 07/11/26(月) 13:38 発言
【52686】Re:カラーパレットの使用方法 美貴 07/11/26(月) 13:42 発言
【52699】Re:カラーパレットの使用方法 ichinose 07/11/26(月) 21:34 発言
【52740】Re:カラーパレットの使用方法 Miki 07/11/29(木) 21:53 質問
【52744】Re:カラーパレットの使用方法 ichinose 07/11/30(金) 8:00 発言
【52753】Re:カラーパレットの使用方法 Miki 07/12/1(土) 11:52 質問
【52754】Re:カラーパレットの使用方法 横入り 07/12/1(土) 14:40 回答
【52758】Re:カラーパレットの使用方法 ichinose 07/12/1(土) 17:54 発言
【52701】Re:カラーパレットの使用方法 Mariko 07/11/26(月) 21:52 発言
【52710】Re:カラーパレットの使用方法 美貴 07/11/27(火) 11:25 お礼

29263 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free