Excel VBA質問箱 IV

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

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


833 / 13645 ツリー ←次へ | 前へ→

【78066】指定したセルのフォントカラーの確認方法を mjhwc152 16/3/26(土) 12:43 質問[未読]
【78068】Re:指定したセルのフォントカラーの確認方... β 16/3/26(土) 12:57 発言[未読]
【78070】Re:指定したセルのフォントカラーの確認方... mjhwc152 16/3/26(土) 17:39 お礼[未読]

【78066】指定したセルのフォントカラーの確認方法...
質問  mjhwc152 E-MAIL  - 16/3/26(土) 12:43 -

引用なし
パスワード
   Microsoft Excel 2013 でマクロの初心者です。
指定セルに入力済の文字のフォントカラーを、マクロでの確認方法を教えて頂けないでしょうか。

【78068】Re:指定したセルのフォントカラーの確認...
発言  β  - 16/3/26(土) 12:57 -

引用なし
パスワード
   ▼mjhwc152 さん:

たとえば 指定セルが A1 の場合。


Sub Test()
  Dim color As Variant
  
  color = Range("A1").Font.color
  
  If IsNull(color) Then
    MsgBox "文字ごとに文字色が異なっています"
  Else
    MsgBox "文字の色コードは " & color & " です"
  End If
  
End Sub

【78070】Re:指定したセルのフォントカラーの確認...
お礼  mjhwc152 E-MAIL  - 16/3/26(土) 17:39 -

引用なし
パスワード
   ▼β さん:
早速のご伝授り難う御座いました。

「 color = Range("A1").Font.color 」は良く理解できました。

最初〜全てを質問すれば良かったのですが、合わせて知りたかった事項が有ったのですが、全てを書かずに質問してしまいました。

改めて「78069」確認した変数を他のマクロ上で使用する為の処理と方法を教えて下さい。で続きの質問を投稿させて頂いています。宜しかったら続けてご伝授願います。

済みませんでした。

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