Excel VBA 質問スレッド No.52 (未解決)

万年カレンダーの祝日の書体を変更したいです

投稿者 : おまんじゅう     投稿日時 : 2018/11/18(Sun) 17:53:31     OS : 未指定     EXCEL : 未指定
エクセルで万年カレンダーを作成しました。
土日や祝日の色を変えることは条件付き書式でできましたが、祝日の書体を変えることができません。(土日は該当する列を「MS Pゴシック」にしています)
通常日は「MS P明朝」を使用、休日は「MS Pゴシック」にしたいのですが、どのようにマクロを組んだらよいか、お教えいただけると幸いです。

[返信 1] Re : 万年カレンダーの祝日の書体を変更したいです
投稿者 : 田中     投稿日時 : 2018/11/18(Sun) 20:32:45
セルの書式を変えるには、セルのFont.Nameプロパティにフォント名を設定すると変更できます。

例えば休日のセルアドレスがA1の場合、

Range("A1").Font.Name = "MS Pゴシック"

となります。

[返信 2] Re : 万年カレンダーの祝日の書体を変更したいです
投稿者 : おまんじゅう     投稿日時 : 2018/11/18(Sun) 22:07:33
早速のお返事をありがとうございます。

最初の質問で説明が不足しておりました。
カレンダーの形式は下記のような感じです。(位置がずれていますが、ごく普通のものです)

2019年1月
日月火水木金土
--12345
6789101112
13141516171819

 ・各セルは日付表示(セルの書式をユーザー定義でdにしています)
 ・平日は黒字・明朝体
 ・日曜は太字・赤字・ゴシック体、土曜は太字・青字・ゴシック体(セル指定)
 ・祝日は別シートの「祝日一覧」リストより条件付き書式により太字・赤字で表示させている

 上記のカレンダーでは1日・14日は明朝体で太字・赤字になっていますが、これをゴシック体にできればと思っております。
 VBAは初心者で、いろいろ試しているのですがなかなかうまくいきません。
 ご教示、よろしくお願いいたします。
 

スポンサード リンク
 
 
当掲示板について
返信入力フォーム
お 名 前  :
内  容   :
ステータス  : この質問を解決済みにする

認証コード  :
        キャプチャ画像


( 処理日時 : 2019-07-18 01:53:28 )

Page
Top