• 締切済み

EXCELの塗りつぶし色・文字色の変数取得

こんにちは。 EXCEL VBAにて現在選択されている塗りつぶし色・文字色の変数を取得したいのですがその変数が何になるのかわかりません。 xlColorIndexは定数でした。 オブジェクトブラウザを見ましたがどれを 使ったらよいのかわかりませんでした。 ご存知の方、ご教授願います。

みんなの回答

  • pankun
  • ベストアンサー率57% (52/90)
回答No.3

下記に、セルの色番号取得のためのユーザー定義関数の作成方法が紹介されていましたので、ご参考になれば…。 http://hp.vector.co.jp/authors/VA016119/hajimete/udf1.html またセルの色の数値番号は下記サイトで紹介されていました。バージョンによって多少違うようですが、基本色はほとんど変わらないようですね。 http://www2s.biglobe.ne.jp/~iryo/2vba/vba26y.html#no9

参考URL:
http://www2s.biglobe.ne.jp/~iryo/2vba/vba26y.html#no9
  • aiho
  • ベストアンサー率42% (3/7)
回答No.2

現在選択されているセルの色番号ということでしょうか? であれば、 塗りつぶしの色番号 ActiveCell.Interior.ColorIndex フォントの色番号 ActiveCell.Font.ColorIndex です。こちらは自動記録で確認できるかと思います。 現在のブックのパレットのRGB値を取得したいのであれば ActiveWorkbook.Colors([パレット番号1~56]) です。 上二つを合わせれば、現在のフォント色のRGB値 ActiveWorkbook.Colors(ActiveCell.Font.ColorIndex) といった取得も可能です。

  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.1

細かいことを行うなら書籍を購入しましょう。

参考URL:
http://hp.vector.co.jp/authors/VA006682/vbaref/vbaref4.htm

関連するQ&A

  • オブジェクト変数の取得

    コモンダイアログを使用して、選択したExcelファイルをAPIの ShellExecute関数で起動を行っているんですが、エクセルファイルを 開いた後に、エクセルのセルのデータを取得したいのです。 オブジェクト変数でエクセルを取得したいのですが、なかなか上手くいきません。 今までは普通に以下のような処理でオブジェクト変数を取得していたのですが set オブジェクト変数 = GetObject("パス") または set オブジェクト変数 = CreateObject("パス") これだど、またエクセルを起動させてしまうので、、 既に起動してしまっているものを取得するのはどうすれば よいのでしょうか? ご教示ねがえませんでしょうか? よろしくお願いいたします。

  • エクセル VBA CheckBox名に変数を使用

    エクセル VBA CheckBoxのオブジェクト名に変数を使用して 値を取得したいのですが・・・ If ActiveSheet.OLEObjects(TempName).Object.Value = True Then          (処理) Else          (処理) End If 「実行時エラー '1004': OLEObject クラスのオブジェクトのプロパティを取得できません。」 というエラーがでてしまいます。 何が原因なのかわかる方是非ご教授ねがいます。

  • IEで文字の色が取得したい

    IEでクリックしてアドレスにジャンプする文字は、 一般的に、未読は青、既読は紫となっていますが、 プログラム(VBA)でその色を知りたいのです。 ウェブブラウザコンポーネント(WebBrowser)を使い VBAで以下のコーディングをすれば、 ホームページの文字を取得することができます。 知りたいのは文字でなく文字の色なのです。 また、スタイルと言うプロパティで色の設定はできますが、 取得ができません。 特に色でなくても既読か、未読かが分かればかまいません。 アンカーエレメントに ForeColor みたいなプロパティは ないのでしょうか?  以上、よろしくお願いします。 For iix = 0 To pDisp.Document.All.length - 1 Debug.Print pDisp.Document.All.Item(iix).innerText Next

  • エクセルのVBAでオブジェクトの配列変数は使えますか?

    VBですとオブジェクトの配列変数というか、コピーしたときに自動的に配列になってしまいますが、エクセルのVBAの場合でオブジェクトの配列変数は使えますか? なにをしたいかというと、ボタンが多すぎて一つ一つにプログラム定義は面倒、そこで配列にしてまわすことにしたいのですが、エクセルで可能でしょうか。 どなたかお願いします。

  • Excel 埋め込みオブジェクトのファイル名取得

    Excelファイルに挿入>オブジェクト>ファイルから ・・・ で選択し、埋め込んだオブジェクトのファイル名をVBAで 取得する事はできますか? 実際には上記のように手動ではなく、 Application.Dialogs(xlDialogInsertObject).Show , " ", , True でダイアログを表示し、ファイルを選択させています。 埋め込んだファイルがフォルダ階層が深かったりすると、 ファイル名まで表示されないので、ファイル名を取得して、 別のセルに入力するまでをVBAで処理をしたいと考えています。 既に埋め込まれているオブジェクトの名前を取得する、もしくは ダイアログで選択されたファイルの名前を取得する、ということが できるのであれば教えていただけますでしょうか?

  • perlとOLEでのExcelのフォント色を取得

    お世話になります。 Perl の OLEを使用して、エクセルの解析を行なっています。 そこで、エクセルの1つのセルに入っている文字の赤色の部分だけを取得したいと思います。 、 例えば、そのセルには [ わたしは チョコレート が好きです ] と書いてあり、 「チョコレート」が赤、その他は黒で書かれています。 それらのようなセルがA列に10行あり、 赤い部分の文字だけPerlのOLEで取得したいのですが、うまくいきません。 試しに ColorIndex を使用してみたのですが、取得できませんでした。 どなたかご存知の方がいらっしゃいましたら、方法をご教授いただけませんでしょうか。 よろしくお願いいたします。

  • エクセルVBAでの変数のスコープ

    基本的なことなのですが、教えて下さい。 当方、PHPやjavascriptを中心にプログラムしてきたのですが、 今回、エクセル+VBAでプログラムすることになり、VBAを勉強しているところなのですが、ちょっと戸惑っています。 いままでは、グローバル変数をなるべく使わないように、プログラミングをしてきたのですが、 VBAの勉強で、参考にしている本のコードは、全てグローバル変数を使っています。 そもそも、エクセルのシート・セルがグローバル変数のようなもの(?)なので、変数のスコープにこだわってもあまり意味がないのかな?とも思います。 エクセル+VBAである程度の規模のプログラムを作る際、 変数のスコープはどのように使い分けるのが良いのでしょうか? すみませんが、ご教授の程、よろしくお願いします。

  • VBAの変数の型について

    VBAの変数の型について VBA初心者です。 下記のようにして背景に色を付けようと思ったのですが、 文字列型の変数名では、型が違うとエラーが出ます。 ただ、事情により、文字列型でしか色情報を取得できないため、 VBA内部で型の変更をして、上手く処理出来ないかと考えています。 文字列型から色名に対応する型への変更は、出来るのでしょうか? --------------------------------------- .BackgroundPatternColor = 文字列型変数名 --------------------------------------- 現在は、諦めて、下記のようにして対応しています。 --------------------------------------- If (bgColor = "黄") Then .BackgroundPatternColor = wdColorYellow End If --------------------------------------- よろしくお願い致します。

  • エクセルVBAでセルの色を取得できますか?

    エクセルVBAについて教えてください。 セルの色のカラーコードを取得とかってできますでしょうか? 「#000000」みたいに。

  • VBAでExcel上のテキストボックス内容をすべて取得するにはどうすれ

    VBAでExcel上のテキストボックス内容をすべて取得するにはどうすればいいでしょうか。 Object.textの場合200文字程度までしか取得できません。

専門家に質問してみよう