エクセルTips

最近、作る幼児用事があったので作ってみたTips

エクセルで印刷する

エクセルで印刷プレビュー

'=========================================================================================
Sub 印刷プレビューする()
Sheets("aaa").PrintPreview 'ブレビューする ※１、２
End Sub
'-----------------------------------------------------------------------------------------
Sub 指定ページを印刷プレビューする()
開始ページ = 1 '※３
終了ページ = 3 '※３
ActiveSheet.PrintOut From:=開始ページ, To:=終了ページ, Preview:=True
End Sub
'=========================================================================================
※１ aaaにはシート名を記入
※２ Sheets("SSS") は ActiveSheet に代えれる
※３ 2 (3) にはプレビューを開始 (終了) するページの番号を記入

ちなみに簡単なメッセージを表示させるには

'=========================================================================

Sub 情報を知らせるメッセージボックス()

MsgBox "あめまぁ～", _

vbInformation, "カンペイ語録" End Sub

 '-------------------------------------------------------------------------

ね簡単だべ。