開発タブを表示する

エクセルのVBAを使用するには、初期設定では表示されていない「開発」タブを表示させる必要があります。

開発タブを表示させる方法は、以下の通りです。

ファイルタブを選択します。

オプションを選択します。

「Excel のオプション」ダイアログボックスが表示されます。

リボンのユーザー設定を選択し、「開発」にチェックを入れ、OKボタンを押します。

開発タブが表示されました。

フォルダ内のエクセルをPDF化するVBAコード

フォルダ内にある全てのエクセルファイルを一括でPDF化したい場合は、以下のコードを利用してください。

Sub エクセル一括PDF化()

Dim ExcelFile, FileName, FilePath, ExcelPDF As String

Application.ScreenUpdating = False

ExcelFile = Application.GetOpenFilename("Microsoft Excelブック,*.xlsx")
FileName = Dir(ExcelFile)
FilePath = Replace(ExcelFile, FileName, "")
ExcelPDF = Dir(FilePath & "*.xlsx")

Do While ExcelPDF <> ""

Workbooks.Open FileName:=FilePath & ExcelPDF, ReadOnly:=True
ExcelPDF = Left(ExcelPDF, InStr(ExcelPDF, ".") - 1)
ActiveWorkbook.ExportAsFixedFormat _
Type:=xlTypePDF, _
FileName:=FilePath & ExcelPDF
ActiveWindow.Close
ExcelPDF = Dir()

Loop

Application.ScreenUpdating = True

End Sub

このコードは、「特定のフォルダの中にあるエクセルファイルを、1つずつ開いてPDFに変換する」というものです。

コードの詳細については以下の表をご参照ください。各項目がどのような動作をするのか解説しています。

以下の「フォルダ内のエクセルを一括でPDF化する方法」セクションでは、こちらのVBAコードを実際に使用して、フォルダ内のエクセルファイルをPDF化する方法を説明します。

フォルダ内のエクセルを一括でPDF化する方法

エクセルのVBAを使用して、フォルダ内のエクセルファイルを一括でPDF化する方法をご紹介します。

作業時間：5分

新規ブックを作成する

VBAを使用する前に新たにブックを作成し、マクロ有効ブックとして保存しておきましょう。新規ブックを作成し、ファイルタブを選択します。

参照を選択する

名前を付けて保存、参照の順に選択します。

マクロ有効ブックを選択する

ブックの保存先（例：ダウンロード）、ファイル名（例：ブック1）を入力し、ファイルの種類、Excel マクロ有効ブック(*.xlsm)の順に選択します。

保存ボタンを押す

保存ボタンを押します。

Visual Basicを選択する

エクセルの編集画面に戻り、開発タブ、Visual Basicの順に選択します。

標準モジュールを選択する

「Microsoft Visual Basic for Applications」が起動します。挿入タブ、標準モジュールの順に選択します。

VBAコードを貼り付ける

本記事「フォルダ内のエクセルをPDF化するVBAコード」セクションにあるコードをコピーし、モジュール内に貼り付けます。

Sub/ユーザーフォームの実行を選択する

Sub/ユーザーフォームの実行を選択します。

フォルダを選択する

「ファイルを開く」ダイアログボックスが表示されます。フォルダがある場所（例：ダウンロード）、フォルダ（例：フォルダ1）の順に選択します。

エクセルファイルを選択する

エクセルのファイル（例：データ1）をどれか1つ選択し、開くボタンを押します。

フォルダにアクセスする

少し待つと、エクセルファイルがすべてPDFに変換されます。フォルダにアクセスし、確認してみましょう。エクスプローラー、フォルダのある場所（例：ダウンロード）、フォルダ（例：フォルダ1）の順に選択します。

フォルダ内のエクセルを一括でPDF化できた

これでフォルダ内のエクセルファイルを一括でPDF化することができました。