最大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

gooドクター

A 回答 (1件)

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

    • good
    • 0
この回答へのお礼

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

お礼日時:2021/11/18 12:41

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

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

gooドクター

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

人気Q&Aランキング