フォント フォントを指定してヘッダーとフッターを設定する

VB&VBA
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[VB&VBA][フォント フォントを指定してヘッダーとフッターを設定する]
Private Sub フォントを指定してヘッダーとフッターを設定する()
'*************************************************
'フォントを指定してヘッダーとフッターを設定する
'*************************************************
'<コメント>
'※1 LeftHeader、CenterHeader、RightHeaderとは、左側、中央、右側ヘッダー
'※2 LeftFooter、CenterFooter、RightFooterとは、左側、中央、右側フッター
    With ActiveSheet.PageSetup
        .LeftHeader = "&""MS Pゴシック""MS Pゴシック"
        .CenterHeader = "&""DF特太ゴシック体,標準""&16DF特太ゴシック体"
        .RightHeader = "&""HG丸ゴシックM-PRO,メディウム""HG丸ゴシックM-PRO"
        .LeftFooter = "&""MS 明朝,標準""MS 明朝"
        .CenterFooter = "&""MS P明朝,標準""MS P明朝"
        .RightFooter = "&""MS ゴシック,標準""MS ゴシック"
    End With
End Sub





Production Japan Import Application. Since 1998