検索
サイト内のVBAコードを検索できます。
[2008/08/26] Update / by dz02572i
 No.[10] 印刷プレビュー |
|
|
ブログトップへ戻る|
|
<--- 一覧へ戻る
[印刷プレビュー] 
Sub prView()
'プレビュー表示
ActiveWindow.SelectedSheets.PrintPreview
End Sub
Sub prView()
'================================
'印刷設定をしてプレビューする
'================================
'印刷設定
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$1" '行タイトル
.CenterHorizontally = True '横位置
.CenterVertically = False '縦位置
.Zoom = 90 '90% に縮小する
End With
'プレビュー表示
ActiveWindow.SelectedSheets.PrintPreview
End Sub
「設定内容」
＊行タイトルを設定すると、2ページ以降にも表示されます
サーバーの空き箱に入ってるニャン。甘えん坊ニャン。拍手はちょっとだけすきニャン。
[A] 印刷・ページ設定
|
【2008-08-26(Tue) 09:12:31】
|
Trackback(-) |
Comments(-)
