
No.3ベストアンサー
- 回答日時:
下記でどうですか。
Sub test05()
bn = InputBox("ブック名")
DoCmd.TransferSpreadsheet acExport, 8, "社員1", "C:\Documents and Settings\xxxx\My Documents\" & bn, True, ""
End Sub
フルパスの前部は適当に変えてください。
ブック名は「.xls」つきで指定のこと。ブック名だけなら
bn & ".xls" にします。
あるいは質問では、Inputboxはやめて、 bn="Access.xls" になるのかも知れません。
No.4
- 回答日時:
Public Sub Auto_Close()
Dim NewBook As Object
Dim fName
Set NewBook = Workbooks.Add
Do
fName = Application.GetSaveAsFilename("D:\Sales\Ac.xls")
Loop Until fName <> ""
NewBook.SaveAs Filename:=fName
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBA Workbook変数に変...
-
ExcelVBAで今開いているユーザ...
-
excelマクロ、任意セルの値で名...
-
【ExcelVBA】指定の書式で、マ...
-
すでに開いているブックのマク...
-
VB2010でExcelの行をコピーして...
-
Excel VBAを後ろで動かす方法
-
エクセルでマッチング
-
[Excel VBA] フォルダ内の複数...
-
VBAでEXCELのワークシートを削...
-
excelでハイパーリンク 別ブッ...
-
フォルダ内の全ブックのシート...
-
フォルダ内の全ブックのシート...
-
EXCELマクロで上書きメッ...
-
複数のデータ系列の線の太さを...
-
VBAを一度起動するとずっと出て...
-
マクロを設定したのに、拡張子...
-
エクセルでツールバーに「縮小...
-
複数のCSVファイルを横に並べて...
-
昨日まで動いていたエクセルの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAで今開いているユーザ...
-
フォルダ内の全ブックのシート...
-
エクセルVBA Workbook変数に変...
-
VB2010でExcelの行をコピーして...
-
【ExcelVBA】指定の書式で、マ...
-
【Excel VBA】ブックを複数開い...
-
フォルダ内の全ブックのシート...
-
VBAでEXCELのワークシートを削...
-
EXCELマクロでxlsとxlsxを開く方法
-
すでに開いているブックのマク...
-
フォルダ内の全てのBookに同じ...
-
他のBookのユーザー定義関数を使う
-
EXCEL VBA起動時の処理
-
excelマクロ、任意セルの値で名...
-
excelでハイパーリンク 別ブッ...
-
エクセルのブックを保存すると...
-
エクセルマクロで、他ブックの...
-
同じ名前で拡張子が違うファイル
-
エクセルのマクロでこんな風に...
-
エクセル マクロ WEBエクセル...
おすすめ情報