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(エクセル)
-
-
4
Excelについて。特定の範囲内で自動的に改ページされることを禁止する
その他(Microsoft Office)
-
5
エクセルの改ページを行ごとに自動挿入するには?
Excel(エクセル)
-
6
エクセルで改ページを連続挿入方法
Excel(エクセル)
-
7
Excel 改ページのVBAうまくいかないです
Excel(エクセル)
-
8
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
9
エクセルの2ページ目の作り方
Excel(エクセル)
-
10
表内、縦位置の中央揃えがど~~してもできない!!
Word(ワード)
-
11
エクセルでセルにページ番号を挿入できる?
Excel(エクセル)
-
12
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
13
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
14
エクセル多項式近似について
Excel(エクセル)
-
15
Excelで数式内の文字色を一部だけ変更したい
Excel(エクセル)
-
16
エクセルのフィルタオプションで「ある文字列を含まない」条件は?
Excel(エクセル)
-
17
右クリック→新規作成→圧縮(zip)形式がなくなりました。
Windows Vista・XP
-
18
エクセルでのヘッダーをページごとにかえられますか?
Excel(エクセル)
-
19
Excelで重複データの件数ではなく、何番目かを求める方法
Excel(エクセル)
-
20
Excelの改ページ印刷についての質問です。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ワードでページ番号を挿入しま...
-
ワードの図表番号の挿入で生じ...
-
【緊急】word2016の図表番号の...
-
ワード文書で1ページのみ別の...
-
ワードで表を作って、中に入れ...
-
エクセルで複数行に一度に改ペ...
-
エクセルの超初心者です…
-
エクセルでオブジェクトを挿入...
-
Wordで脚注をページ下部ではな...
-
Excelのセル内に写真を手軽に挿...
-
wordの相互参照機能を使うと改...
-
WORDの表にタイトル(?)をつけ...
-
MS wordにexcel貼り付け複数ページ
-
Inventorのイメージ挿入
-
一太郎2005でページ挿入
-
Wordで日付、時刻挿入について...
-
Power Point の直線が双方向矢...
-
ワードで文字の挿入ができなく...
-
WORDのページ番号で
-
Wordに回覧、丸秘等を挿入したい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ワードでページ番号を挿入しま...
-
ワードの図表番号の挿入で生じ...
-
ワード文書で1ページのみ別の...
-
WORDの表にタイトル(?)をつけ...
-
エクセルの超初心者です…
-
ワードで表を作って、中に入れ...
-
EXCEL 最終行に行を挿入(追加...
-
EXCEL 改ページ自動挿入方法を...
-
2頁にまたがる表の表番号
-
Wordで脚注をページ下部ではな...
-
エクセルで複数行に一度に改ペ...
-
不要に貯まっていく相互参照の...
-
【緊急】word2016の図表番号の...
-
wordの相互参照機能を使うと改...
-
Wordで日付、時刻挿入について...
-
Wordに回覧、丸秘等を挿入したい
-
エクセルで改ページを連続挿入方法
-
エクセルでオブジェクトを挿入...
-
Excelのセル内に写真を手軽に挿...
-
PDFに白紙ページを挿入できるフ...
おすすめ情報