シートの印刷枚数が2枚以上になる場合、1枚に収めてかつ中央寄せする処理 If Application.ExecuteExcel4Macro("get.document(50)") > 1 Then With ActiveSheet.PageSetup .Zoom = False .FitToPagesTall = 1 .FitToPagesWide = 1 .CenterHorizontally = Tr…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。