回答編集履歴
2
書式の改善
answer
CHANGED
|
@@ -15,6 +15,7 @@
|
|
|
15
15
|
|名前|必須 / 省略可能|データ型|説明|
|
|
16
16
|
|:--|:--:|--:|
|
|
17
17
|
|IgnorePrintAreas|省略可能|バリアント型 (Variant)|True に設定すると、発行する場合に印刷範囲が無視されます。 False に設定すると、発行する場合に印刷範囲が使用されます|
|
|
18
|
+
|
|
18
19
|
下記でどうでしょう。
|
|
19
20
|
```vba
|
|
20
21
|
Worksheets("印刷シート").PageSetup.PrintArea = "A1:E30"
|
1
追記
answer
CHANGED
|
@@ -3,4 +3,21 @@
|
|
|
3
3
|
下記をご参考に。
|
|
4
4
|
|
|
5
5
|
|
|
6
|
-
[初心者でも簡単！エクセルVBAでPDFを出力する最もシンプルなプログラム](https://tonari-it.com/excel-vba-pdf/)
|
|
6
|
+
[初心者でも簡単！エクセルVBAでPDFを出力する最もシンプルなプログラム](https://tonari-it.com/excel-vba-pdf/)
|
|
7
|
+
|
|
8
|
+
追記
|
|
9
|
+
---
|
|
10
|
+
> ページエリアも指定の場所でない部分がpdf化されるだけになってしまいます。
|
|
11
|
+
|
|
12
|
+
[Workbook.ExportAsFixedFormat メソッド (Excel)](https://msdn.microsoft.com/ja-jp/vba/excel-vba/articles/workbook-exportasfixedformat-method-excel?f=255&MSPPError=-2147217396)
|
|
13
|
+
|
|
14
|
+
上記より引用
|
|
15
|
+
|名前|必須 / 省略可能|データ型|説明|
|
|
16
|
+
|:--|:--:|--:|
|
|
17
|
+
|IgnorePrintAreas|省略可能|バリアント型 (Variant)|True に設定すると、発行する場合に印刷範囲が無視されます。 False に設定すると、発行する場合に印刷範囲が使用されます|
|
|
18
|
+
下記でどうでしょう。
|
|
19
|
+
```vba
|
|
20
|
+
Worksheets("印刷シート").PageSetup.PrintArea = "A1:E30"
|
|
21
|
+
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, fileName:=fileName _
|
|
22
|
+
IgnorePrintAreas = False
|
|
23
|
+
```
|