質問編集履歴
3
ActiveWorkbook.PrintPreviewについて修正致しました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -60,7 +60,7 @@
|
|
60
60
|
|
61
61
|
Sub output_PDF()
|
62
62
|
|
63
|
-
ActiveWorkbook.Print
|
63
|
+
ActiveWorkbook.PrintPreview
|
64
64
|
|
65
65
|
End Sub
|
66
66
|
|
@@ -68,15 +68,9 @@
|
|
68
68
|
|
69
69
|
=>
|
70
70
|
|
71
|
-
プリント
|
71
|
+
直接プリンターからの出力がスタートしてしまい、
|
72
72
|
|
73
|
-
プリント中にエラーが起きました。
|
74
|
-
|
75
|
-
|
76
|
-
|
77
|
-
|
73
|
+
手で印刷データをpdfとして保存することはできませんでした。
|
78
|
-
|
79
|
-
オブジェクト'PrintOut'のメソッド'_Workbook'が失敗しました。
|
80
74
|
|
81
75
|
|
82
76
|
|
2
コードとエラーについて追記致しました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -24,26 +24,6 @@
|
|
24
24
|
|
25
25
|
|
26
26
|
|
27
|
-
```
|
28
|
-
|
29
|
-
プリント
|
30
|
-
|
31
|
-
プリント中にエラーが起きました。
|
32
|
-
|
33
|
-
|
34
|
-
|
35
|
-
実行時エラー '1004';
|
36
|
-
|
37
|
-
アプリケーション定義またはオブジェクト定義のエラーです。
|
38
|
-
|
39
|
-
```
|
40
|
-
|
41
|
-
|
42
|
-
|
43
|
-
### 該当のソースコード
|
44
|
-
|
45
|
-
|
46
|
-
|
47
27
|
```vba
|
48
28
|
|
49
29
|
Sub output_PDF()
|
@@ -58,6 +38,46 @@
|
|
58
38
|
|
59
39
|
```
|
60
40
|
|
41
|
+
=>
|
42
|
+
|
43
|
+
プリント
|
44
|
+
|
45
|
+
プリント中にエラーが起きました。
|
46
|
+
|
47
|
+
|
48
|
+
|
49
|
+
実行時エラー '1004';
|
50
|
+
|
51
|
+
アプリケーション定義またはオブジェクト定義のエラーです。
|
52
|
+
|
53
|
+
|
54
|
+
|
55
|
+
そこでマクロによる動作はプリントアウト画面まで、
|
56
|
+
|
57
|
+
その後は手でpdf化という方法についても検討し以下のコード実行
|
58
|
+
|
59
|
+
```vba
|
60
|
+
|
61
|
+
Sub output_PDF()
|
62
|
+
|
63
|
+
ActiveWorkbook.PrintOut
|
64
|
+
|
65
|
+
End Sub
|
66
|
+
|
67
|
+
```
|
68
|
+
|
69
|
+
=>
|
70
|
+
|
71
|
+
プリント
|
72
|
+
|
73
|
+
プリント中にエラーが起きました。
|
74
|
+
|
75
|
+
|
76
|
+
|
77
|
+
実行時エラー '1004';
|
78
|
+
|
79
|
+
オブジェクト'PrintOut'のメソッド'_Workbook'が失敗しました。
|
80
|
+
|
61
81
|
|
62
82
|
|
63
83
|
### 補足情報(FW/ツールのバージョンなど)
|
1
初心者アイコンをオンに変更いたしました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -15,6 +15,8 @@
|
|
15
15
|
当方初心者で申し訳ございませんが、
|
16
16
|
|
17
17
|
どなたかアドバイスいただけましたら幸いです。
|
18
|
+
|
19
|
+
|
18
20
|
|
19
21
|
|
20
22
|
|