dポイントプレゼントキャンペーン実施中!

ACCESS VBAで、エクセルファイルの更新を行いたいのですが、方法を教えてください。

エクセルで書式や集計の計算式を作成し、データ部のみACCESSで集計した値を置き換える方法を教えてください。

A 回答 (1件)

Dim App 'Excelのアプリケーション


Dim Wkb 'ワークブック
Dim Wks 'ワークシート
Set App = CreateObject("Excel.Application")
Set Wkb = App.Workbooks.Open("C:\~") '★既存ファイルの場合
Set Wkb = App.Workbooks.Add '★新しいブックを作る場合
Set Wks = Wkb.WorkSheets(1) '★既存のシートの場合
Set Wks = Wkb.WorkSheets.Add '★新しいシートを作る場合
== Wksオブジェクトの操作 ==
App.DisplayAlarts = False '上書き警告を無視する
Wkb.Save '★上書き保存
Wkb.SaveAs "C:\~" '★名前を付けて保存
App.Quit 'Excelを終了する
Set App = Nothing 'プロセス空間を解放する

ブックやシートの操作はExcelのVBAと同じです。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A