プロが教えるわが家の防犯対策術！

おしえて

Excelで特定の文字のところで自動的に改ページしたい

解決済

  • 質問者：urara3453
  • 質問日時：
  • 回答数：1件

下記マクロを作成していただいたのですが
改ページのみ自動的に設定したいので
プリントアウト部分を削除したいのですが
その方法がわかりません。
教えて頂けないでしょうか？
宜しくお願いいたします。

マクロはよくわからないのですが
※ExcelのG列で”改”の文字が
入力されていたときに”改”がある
行毎に改ページを設定している
マクロだと思うのですが、、、
このまま使用するとプリントアウトまで
してしまいます。

Sub test01()
d = Range("B65536").End(xlUp).Row
For i = 2 To d
If InStr(Cells(i, "G"), "改") > 0 Then
Cells(i, 1).PageBreak = xlPageBreakManual
End If
Next i
Cells.PrintOut
End Sub

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

Cells.PrintOut　のコードを削除するだけでOKです。

    • good
    • 0
    • 件
通報する
この回答へのお礼

ありがとうございます～～～
(m´・ω・｀)m

通報する
お礼日時：2021/11/18 12:41

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報