![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.2ベストアンサー
- 回答日時:
関数式では、セルの挿入、削除、改行の挿入、削除などは出来ないようです。
VBAになれば、オフラインバッチ処理の定番である、「キー
(例えば所属部)が変われば、改ページする」のは,しょっちゅう行われることです。サンプルを載せます。
Sub test01()
ma = Mid(Cells(1, 1), 1, 1)
For i = 1 To 10
n = Cells(i, 1).Value
a = Mid(n, 1, 1)
If a <> ma Then
Worksheets("sheet1").Rows(i).PageBreak = True
End If
p01:
ma = a
Next i
End Sub
マクロの記録はやや、ややこしいですが骨子は上記の通り。
No.1
- 回答日時:
当方はExcel2000ですけど、VBAであれば可能ではないかと思います。
例えば、A2からデータが入っているとして、簡単なプログラム例ですが、
Sub 改ページの挿入()
Dim chkData
Dim i
chkData = Range("A2").Value
For i = 3 To 65535
If Range("A" & i).Value = "" Then
Exit For
End If
If Range("A" & i).Value <> chkData Then
Rows(i).Select
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
chkData = Range("A" & i).Value
End If
Next i
End Sub
Sub 改ページの削除()
ActiveSheet.HPageBreaks(1).DragOff Direction:=xlDown, RegionIndex:=1
End Sub
表示メニューの改ページで、実行結果をご確認ください。
ご参考になれば幸いです。m(__)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- ホームページ作成・プログラミング 秀丸に関して教えて下さい。 1 2022/06/30 10:00
- Word(ワード) Google ドキュメントで改ページを挿入する方法 1 2022/05/25 19:22
- Visual Basic(VBA) 改ページ 2 2023/03/10 21:29
- Word(ワード) Word2013 縦書き上下二段の表、改行を続けると次ページに情報が表示されるようにしたい 3 2022/06/16 09:24
- PDF PDFに白紙ページを挿入できるフリーソフト 2 2022/06/07 21:11
- その他(パソコン・スマホ・電化製品) Webページ印刷時にヘッダー・フッターをつけたい 1 2022/04/25 21:35
- ノートパソコン ページ番号の入れ方について 3 2023/02/16 17:11
- PowerPoint(パワーポイント) you tubeにパワポで作った動画を投稿する方法 1 2023/04/09 22:56
- Excel(エクセル) エクセルのAltを押すと「自動保存」「上書き保存」・・・に白抜きの「1」「2」・・・が出る。 2 2023/08/11 11:39
- Excel(エクセル) Excelのマクロを教えていただけないでしょうか? 1 2023/07/06 19:56
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
Excelで特定の文字・記号のところで自動的に改ページしたい
Excel(エクセル)
-
Excelで特定の文字のところで自動的に改ページしたい
Excel(エクセル)
-
Excelについて。特定の範囲内で自動的に改ページされることを禁止する
その他(Microsoft Office)
-
-
4
エクセルで複数行に一度に改ページを挿入する方法
Excel(エクセル)
-
5
エクセルで改ページを連続挿入方法
Excel(エクセル)
-
6
エクセルの改ページを行ごとに自動挿入するには?
Excel(エクセル)
-
7
ヘッダー
Excel(エクセル)
-
8
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
9
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
10
Excelで・・・1ページあたりの行数を指定できますか?
Excel(エクセル)
-
11
Excel フィルタをかけた後の各項目を、自動的に印刷する方法は?
その他(Microsoft Office)
-
12
表内、縦位置の中央揃えがど~~してもできない!!
Word(ワード)
-
13
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
14
Excel 改ページのVBAうまくいかないです
Excel(エクセル)
-
15
Excelで50行毎に改ページを入れたい
その他(Microsoft Office)
-
16
EXCELで2つの数値のうち大きい方を採択する数式
Excel(エクセル)
-
17
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルの超初心者です…
-
ワードでページ番号を挿入しま...
-
ワードの図表番号の挿入で生じ...
-
エクセルでオブジェクトを挿入...
-
2頁にまたがる表の表番号
-
不要に貯まっていく相互参照の...
-
WORDのページ番号で
-
EXCEL 最終行に行を挿入(追加...
-
WORDの表にタイトル(?)をつけ...
-
ワード文書で1ページのみ別の...
-
PDFに白紙ページを挿入できるフ...
-
MS wordにexcel貼り付け複数ページ
-
エクセルで改ページを連続挿入方法
-
texのエラ-で
-
ワードで表を作って、中に入れ...
-
Wordに回覧、丸秘等を挿入したい
-
エクセル2010の開発タブについて
-
EXCEL 改ページ自動挿入方法を...
-
ワードでの図表番号を自由に動...
-
WORD:ページ毎に独立して編集...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ワードでページ番号を挿入しま...
-
WORDの表にタイトル(?)をつけ...
-
ワード文書で1ページのみ別の...
-
エクセルで複数行に一度に改ペ...
-
ワードの図表番号の挿入で生じ...
-
ワードで表を作って、中に入れ...
-
Wordで脚注をページ下部ではな...
-
エクセルの超初心者です…
-
EXCEL 最終行に行を挿入(追加...
-
2頁にまたがる表の表番号
-
WORDのページ番号で
-
Wordで日付、時刻挿入について...
-
不要に貯まっていく相互参照の...
-
【緊急】word2016の図表番号の...
-
エクセルで改ページを連続挿入方法
-
EXCEL 改ページ自動挿入方法を...
-
PDFに白紙ページを挿入できるフ...
-
エクセルでオブジェクトを挿入...
-
wordの相互参照機能を使うと改...
-
一太郎2005でページ挿入
おすすめ情報