No.1Excel内置了一些文件打开、保存、选择等对话框,本节主要介绍一下如何利用这些内置对话框来进行文件的相关操作。
学习之前,首先认识一下对象FileDialog,此对象提供了文件对话框操作功能。
主要有如下四个功能:
包含了文件选择、打开、另存为,文件夹选择。
上述常量是任选项。
使用方法为:
Dim Fobj As FileDialog
Set Fobj = Application.FileDialog(msoFileDialogFilePicker)
这样就定义了一个FileDialog对象,变量名称为Fobj。
之后对Fobj变量进行属性设置和方法操作就可以了。
FileDialog属性
根据上图属性说明,可以进行相关参数设置,以达到程序所要求的条件。
具体方法下面有示例介绍。
上图示例中,设置了四个按钮,分别对应FileDialog对应的四个方法:打开、选择文件、保存文件和选择文件夹。
选择文件
利用FileDialog对象可实现任意选择文件功能,选择之后可以对文件进行复制、粘贴、打开等等操作,根据需求功能不同进行编程。
打开文件
着重介绍一下FileDialog两个方法:
show 显示对话框,当单击确定后返回值-1,当单击取消值返回0execute 在调用 Show 方法后立即执行用户的操作注意一点,如果调用了show方法,在关闭对话框之前就不再执行任何代码了,所以有些属性设置要在调用show之前进行设置,不然会发现不可用。
No.2下面用一些代码来具体演示,如何实现整个过程。
调用对话框函数
打开按钮过程代码
选择文件按钮代码
所有用到FielDialog属性都在代码中体现,仔细看会发现每个用处都十分必要。
DialogType '判断FileDialog类型.AllowMultiSelect = False '设置单选.SelectedItems.Count'返回选择文件总数.SelectedItems(i)'返回单项文件路径和文件名有兴趣把属性图中的内容记住,使用就更加方便了。
欢迎关注、收藏
---END---