質問編集履歴
1
「```」を挿入しました
title
CHANGED
File without changes
|
body
CHANGED
@@ -1,6 +1,6 @@
|
|
1
1
|
### 前提・実現したいこと
|
2
2
|
|
3
|
-
|
3
|
+
```
|
4
4
|
上からずらっと10000行ぐらいあるデータを保管しているエクセルがあります。(2行目まではタイトル)
|
5
5
|
K列(11行目)の値(文字です)が変更されたとき、変更された場所で改ページを
|
6
6
|
挿入するマクロを作成したいのですが、下記のマクロで対応すると改ページが挿入されたり
|
@@ -8,6 +8,7 @@
|
|
8
8
|
|
9
9
|
そこで
|
10
10
|
①このマクロでなぜ改行が挿入されない時が存在するのかどうかを教えてください。
|
11
|
+
```
|
11
12
|
②改良できる場所があれば教えてください。
|
12
13
|
|
13
14
|
|
@@ -19,7 +20,8 @@
|
|
19
20
|
|
20
21
|
### 該当のソースコード
|
21
22
|
|
22
|
-
```
|
23
|
+
```
|
24
|
+
vba
|
23
25
|
sub 改ページ()
|
24
26
|
|
25
27
|
Dim i As Long
|
@@ -56,10 +58,12 @@
|
|
56
58
|
Worksheets("シート名").PrintPreview
|
57
59
|
|
58
60
|
End sub
|
61
|
+
```
|
59
62
|
|
60
63
|
|
61
64
|
|
62
65
|
### 補足情報(FW/ツールのバージョンなど)
|
63
|
-
|
66
|
+
```
|
64
67
|
Windows7 32bit Excel2010での環境です。
|
65
|
-
シート名には実務で使用する際に使うブックのシートの名前が入ります。
|
68
|
+
シート名には実務で使用する際に使うブックのシートの名前が入ります。
|
69
|
+
```
|