返回

缺省目录和文件名_Excel VBA应用

Office技巧

正文

什么是缺省目录和文件名

在Excel中，缺省目录是打开或保存文件时系统自动打开的目录。缺省文件名是打开或保存文件时系统自动显示的文件名。缺省目录和文件名可以通过VBA代码进行设置。

如何使用VBA代码设置缺省目录和文件名

要使用VBA代码设置缺省目录和文件名，可以按照以下步骤操作：

  1. 打开Excel，然后按Alt + F11打开Visual Basic编辑器。
  2. 在“工程资源管理器”窗口中，双击要编辑的VBA模块。
  3. 在VBA模块的代码窗口中，添加以下代码：
'设置缺省目录
ChDrive "C:\My Documents"
ChDir "C:\My Documents\My Folder"

'设置缺省文件名
DefaultSaveFormat = xlNormal

'打开文件
Workbooks.Open "C:\My Documents\My Folder\Book1.xlsx"

'保存文件
ActiveWorkbook.SaveAs "C:\My Documents\My Folder\Book2.xlsx"
  1. 按F5运行代码。

代码说明

  • ChDrive和ChDir函数用于设置缺省目录。
  • DefaultSaveFormat属性用于设置缺省文件名。
  • Workbooks.Open方法用于打开文件。
  • ActiveWorkbook.SaveAs方法用于保存文件。

注意事项

  • 在设置缺省目录和文件名时，需要注意以下几点：
    • 缺省目录必须是有效的目录路径。
    • 缺省文件名必须是有效的文件名。
    • 缺省目录和文件名只能在当前会话中使用。
  • 如果要永久更改缺省目录和文件名，需要修改注册表。
    • Windows 10：按Win+R打开运行对话框，然后输入“regedit”并按Enter键。
    • 在注册表编辑器中，找到以下键：
      • HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Excel\Options
    • 在“Options”键下，找到以下值：
      • DefaultFilePath
      • DefaultSaveFormat
    • 双击要修改的值，然后输入新的值。
    • 单击“确定”按钮保存更改。

相关推荐