Microsoft Access 掲示板
Accessのテーブルを任意のフォルダにエクセルで出力したい / 2
最新トピック
1
19 日前
排他制御 19 日前
2
1 ヶ月前
Hatena様にご質問 1 ヶ月前
6
3 ヶ月前
ﾓｼﾞｭｰﾙでｶﾚﾝﾄﾌｫｰﾑのｺﾝﾄﾛｰﾙを使うには 3 ヶ月前
7
4 ヶ月前
日付のテキストボックスからフォームが開けません 4 ヶ月前
9
4 ヶ月前
レポートにおける数値の間隔を広げる方法 4 ヶ月前
12
4 ヶ月前
リストボックスから複数選択しそれをテーブルに格納したい 4 ヶ月前
11
5 ヶ月前
ＳＱＬの型が一致ませんエラー 5 ヶ月前
タグリスト
Markdown テーブル生成
Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。
Ｅｘｃｅｌ出力のVBAを以下のように書きました
Private Sub Excel出力_Click()
'変数宣言
Dim strPath As String
'Excelエクスポート先のファイルパス
strPath = "C:\Users\" & UserName & "○○○リスト" & Format(Now(), "yyyymmdd")
'Excelファイルの出力
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "○○○リスト出力", strPath, False
'Excelファイルをエクスポートした旨を通知する。
MsgBox "○○○リストを出力しました。" & vbCrLf & "C:\Users\" & UserName & "\OUT\", vbInformation
End Sub
を実行すると
実行時エラー’3051’
ファイル’C￥Users¥○○○リスト2022****’を開くか、書き込むことができませんでした。ほかのユーザーが排他的に開いているか、データーの表示と書き込みを行う権限がありません。
とメッセージがでてしまいます
どうしｔら解消できるでしょうか
よろしくお願いします