Access Tips

MicrosoftAccessを活用するためのテクニックを紹介しています

Excel形式でファイル出力する

テーブルやクエリーをExcelで出力する

1.デザインビューで[デザイン]-[ボタン]をクリックしボタンを配置する。

f:id:BeansWorks:20141203230550p:plain

2.プロパティシートの[その他]で[名前]を「btn_Export」に変更し、[イベント]-[クリック時]のビルドボタンをクリックする。

f:id:BeansWorks:20141203230633p:plain

 

3.「ビルダーの選択」ウインドウが表示されたら「コードビルダー」を選択し[OK]をクリック。

f:id:BeansWorks:20141203230708p:plain

 

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

------------------------------------------------------------------------------------------------

f:id:BeansWorks:20150423063045p:plain

 

サンプルファイルダウンロード