Access VBAでフォルダ名やファイル名を変更する

Microsoft Accessで任意のフォルダ名やファイル名、保存先を変更する方法です。

Registered 2022.09.09 Update 2023.05.21  技術習得:業務系アプリQ&A,独自開発

目次

Access使用時にリンクファイル名などを変更したい時に便利

Accessで作った業務アプリから関連ファイルにリンクしていますが、「ファイルの命名をAccess上からしたい」と要望があり、搭載したことがあります。

本音は該当フォルダに直接アクセスして変更して欲しいのですが、それが面倒とか言われて修正を余儀なくされたわけです。

VBAのサンプル

Sub NameRep()

  '名前のみ変更
  Name "c:\tmp\OldData.txt" As "c:\tmp\NewData.txt"

  '名前は変えずに別のフォルダに移動
  Name "c:\tmp\OldData.txt" As "c:\tmp\新しいフォルダ\OldData.txt"

  '名前を変えて別のフォルダに移動
  Name "c:\tmp\OldData.txt" As "c:\tmp\新しいフォルダ\NewData.txt"


  'フォルダ名の変更
  Name "c:\tmp\古いフォルダ" As "c:\tmp\新しいフォルダ"

  'フォルダの移動
  Name "c:\tmp\古いフォルダ" As "c:\tmp\新しいフォルダ\古いフォルダ"

End Sub

フォルダ名やファイル名を変更できない時

対象フォルダ又はファイルの保存先のアクセス権限で、Accessからの変更が認められないことがあります。サーバの管理者にお問い合わせください。


関連ページ

トップへ