Excel形式でファイル出力する
テーブルやクエリーをExcelで出力する
1.デザインビューで［デザイン］-［ボタン］をクリックしボタンを配置する。
2.プロパティシートの［その他］で［名前］を「btn_Export」に変更し、［イベント］-［クリック時］のビルドボタンをクリックする。
3.「ビルダーの選択」ウインドウが表示されたら「コードビルダー」を選択し［OK］をクリック。
4.VBAのコードウインドウに次のコードを入力し保存する。
------------------------------------------------------------------------------------------------
Private Sub btn_Export_Click()
On Error GoTo Err_btn_Export_Click
Dim FileName As String
DoCmd.OutputTo acOutputTable, "MST_Item", acFormatXLS, , True
Exit_btn_Export_Click:
Exit Sub
Err_btn_Export_Click:
MsgBox Err.Description
Resume Exit_btn_Export_Click
End Sub
------------------------------------------------------------------------------------------------
サンプルファイルダウンロード
