• ベストアンサー

VBAの色名称

ARCの回答

  • ARC
  • ベストアンサー率46% (643/1383)
回答No.3

VBにどんな定数が登録されているのかを知るには「オブジェクトブラウザ」を使います。 VBEの画面でF2キーを押し、オブジェクトブラウザを表示させます。 んで、「vbRed」を検索すると、「VBA.ColorConstants」ってのが見つかると思います。 ここを見ると、どんな色が定数として登録されているのかが分かります。 つまり、「ごくごく基本的な色しか登録されていない」っていうのが結論です(汗)。 自分で色定数を登録してもいいんじゃないでしょうか。 コードの先頭に Const vbLightBlue = &HFF8080 'Hex(RGB(128, 128, 255)) とか書いたりして(^^;

関連するQ&A

  • エクセルのマクロとVBAについて

    まだあまり多用していないのですが、エクセルでは使っていくアイコンを指定することで(それを利用することで)、マクロを組みそれがエクセルのVBAで記述されるということですが、その逆エクセルのVBAで記述したプログラムを動作に対応したアイコン等の流れで示すことは出来るのでしょうか?もしあったらどのような方法でしょう?

  • スプレッドのヘッダ文字色替え

    スプレッドのヘッダの文字色を指定列だけ 変更することは可能でしょうか? Spd_spread1.ShadowText = vbRed を記述すると全文字が赤色になってしまいます。 ちなみに行番号・列番号を指定してみましたが 同じ結果になってしまいました。 どなたかご存知の方がいらっしゃいましたらよろしくお願いします!

  • VBAのシート名称取得について

    VBAにてシート名称を取得しシート1の一覧にまとめ、ハイパーリンクで一覧から各シートへ飛べるようにしています。 Dim retsu As Long,gyo As Long For retsu = 1 To Worksheets.Count 'シート名称をリストに記入 ThisWorkbook.Worksheets(1).cells(gyo + 1, 2) = Worksheets(retsu).name Next このコードでシート名称を取得するとシート名称が「001」などの頭に0の数字があるとき、リスト上では「1」となってしまいます。 そのため、リスト上とシート名称が異なり、ハイパーリンクの設定時に参照エラーとなってしまいます。 桁数を問わずに「001」は「001」のまま、「1」は「1」のまま取得するにはどうすればよいでしょうか? ※シート名称には「1月度」などの文字列もあります。(数字の名称のみではありません)

  • エクセルVBAで。

    お世話になります。 VBA初心者です。 (初心者でもないのですが、しばらく遠ざかっていました。) エクセルVBAの記述内容をコピーし、 エクセルの通常のシートへ貼り付けした際、 記述上「’」で始まる文字は緑色が付いていますが、 通常のシートへ貼り付けした際、黒字になってしまいます。 そこで、下記の様なVBAを記述し、貼り付け後に、 「’」から始まる文字を緑色に着色しようと試みましたが (やはり)うまくいきませんでした。 エクセル関数なんかも織り交ぜたおかしな記述だと思いますが 何となくやりたい事が伝わって頂けるかと思うのですが、 どう修正したら出来ますでしょうか。 ご教授下さいます様、宜しくお願いいたします。   記 Sub 色() Dim y As Integer Dim x As Integer Dim a As Integer mysheet = ActiveSheet.Name For y = 1 To 10 x = Sheets(mysheet).Cells(Rows.Count, y).End(xlUp).Row a = 0 Do Until a > x a = a + 1 If Right(Cells(y, a), 1) = "'" Then Cells(y, a).Select Selection.Font.ColorIndex = 10 End If Loop Next End Sub

  • EXCEL VBA の記述で文字を大きくしたい

    いつもお世話になっております。 EXCEL VBA でマクロを記述した中で、 1行だけ文字を大きく(太字でもOK)する事はできますか? (変更したらすぐにわかるように) それと通常、記述文字の色は黒で、コメントは、緑です。 他に色はないですか? よろしくお願いいたします。

  • Excel VBA Cells 絶対参照 書き方

    Excel VBAにてお尋ねいたします。 Excel VBAにてCellsを使用してセル範囲を指定させていただく際に、絶対参照($A$1:$E$10など)を使用する場合はどのように記述すればよろしいでしょうか? Cellsを使用するのは、セル範囲が毎回異なるため、範囲指定に変数を使用しているためです。 相対参照でしたら、Range(Cells(1,1),Cells(Rows<行番号の変数>,Cols<列番号の変数>))といった記述かと思いますが、絶対参照の場合はどのように記述すればよろしいでしょうか?

  • エクセルシートの名称をに色を付けたい

    エクセルのシートをたくさん作った場合、見やすくする為 シートの名称に色を付けて見やすくする方法はありますか?

  • ExcelのVBAで他のファイルを起動する時の指定

    ExcelのVBAで他のファイルを起動する時の指定 ExcelのVBAで他のファイルを起動する時の指定の仕方で、 例えば同ディレクトリや一つ下の階層のファイルとかの場合、 フルパス以外で簡単に指定する方法はあるのでしょうか? 現在フルパスにて記述しているのですが、 ファイルを移動したりした時に、またそちらでのフルパスに 修正しないといけなくなるので手間がかかって困っています。 何かいい方法はないでしょうか? Excelは2000を使っています。

  • エクセルVBAでの質問です。

    エクセルVBAでの質問です。 エクセルのデーター一覧検索でヒットしたセルの色を選択している時だけ変更させるには?(出来れば点滅にしたい) よろしくお願します。

  • VBA コンパイル

    エクセルVBA初心者です。 コードを記述している際に、”迷惑な”コンパイルエラーが出てきます。 例えば dim i i= 記述中に、他をマウスクリックすると、コンパイルエラーになります。 エラーなのは重々理解していますが、実行時にエラーかどうか判定して欲しいです。 オプションで、順次コンパイルOFFなどして試行錯誤しましたが、不可能でした。 仕様なのでしょうか? エクセル2007