Excel VBA - 操作文件

操作文件有以下几个功能。

1. 获取文件的路径：当前的文件路径。

函数：thisworkbook.path

Dim ipath, iname As String

ipath = ThisWorkbook.Path & "\"

返回的ipath为当前目录，例如：D:\工作\0307（华泰升版最终）\华泰\ST\1\。后面可以直接跟文件名。

2. 用于判断是否存在文件：Dir

返回一个文件名，需要明确扩展名，例如：

Dim ipath, iname As String

iname = Dir(ipath & "1.xls*") 如果ipath路径下存在1.xls，则iname被赋值为“1”。如果没有，则赋值为空（“”）

iname = Dir(ipath & "*.xls*") 如果ipath路径下.xls文件，则返回第一个xls的文件名。如果没有，则赋值为空（“”）

3. 复制文件：Filecopy

把A路径的文件复制到B路径，很简单实用的函数，例如：

Sub CopytheFile()
Dim s As String
Dim PumpTable As String

PumpTable = "\400700ST-DS07-0001.xlsx"
s = ThisWorkbook.Path & "\Standard Table\PST.xlsx"

FileCopy s, ThisWorkbook.Path & PumpTable 注意使用的时候没有括弧，s为源文件路径和文件名，逗号后面为新路径和新文件名。

End Sub

Excel VBA - 操作文件相关推荐

使用VBA操作文件(1):使用Excel对话框
转贴自 http://www.excelperfect.com/2009/08/05/handlefileswithvba/ 使用VBA操作文件(1):使用Excel对话框本专题主要讲述使用VBA ...
Excel VBA 移动文件和文件夹
之前有博主的方法,然后觉得可以1和2结合一下,所以试试看. 先放上Excel VBA 移动文件和文件夹的方法.等我研究一下再放新方法.学习学习~ 1.移动指定文件: Public Sub 移动文件() ...
(转)Excel VBA 操作 Word（入门篇）
原文地址本文的对象是:有一定Excel VBA基础,对Word VBA还没有什么认识,想在Excel中通过VBA操作Word还有困难的人. 一.新建Word引用需要首先创建一个对 Word App ...
ie 不执行回调函时_「Excel VBA操作IE篇」10分钟内设置完成，3句代码打开IE浏览器
大家好,我是咚腔! Excel VBA还可以操作IE浏览器,有没有搞错? 没错,可以操作,而且非常好用.因为Excel有强大的数据分析功能. 这有什么关系?关系很大. 现在是数据时代,定期数据获取以 ...
Excel VBA遍历文件
休息日,无聊的上Excel Home看看有啥东东可学习,有啥问题能帮帮忙.看到很多帖子都是求助遍历特定文件夹下文件的实现方法.有朋友说03版Excel有FileSearch对象可以遍历文件夹下文件,0 ...
Excel VBA选择文件、高容错性地打开文件
VBA选择文件 Sub SelectFile() Dim FileName As Variant '打开文件对话框返回的文件名,是一个全路径文件名,其值也可能是False,因此类型为Variant D ...
用Excel VBA选择文件、打开文件
介绍如何用VBA选择文件和用VBA打开文件. 点击打开文件会弹出一个windows文件打开对话框,在EXCEL中VBA怎么实现这个功能? Sub SelectFile() Dim FileNa ...
vba单元格批量赋值,EXCEL——VBA对文件夹下所有表格的特定单元格赋值
image 不知道大家有没有遇到过这种情况,一个文件夹下有很多Excel文件,每个文件里面一个或多个表都有一个同样的单元格,比如自己的名字啊.生日啊之类的.这个时候如果要改动这个单元格的内容我们需要一 ...
Excel VBA 批量操作文件，FileSystemObject 方式，避免文件名中的奇怪字符
之前使用使用Dir批量获取指定文件夹下的excel文件的时候,出现了问题. 出现的问题是:文件名中的空格被替换成了**?**,导致打开文件的时候出现无法找到的情况. 使用FileSystemObjec ...

Excel VBA - 操作文件

Excel VBA - 操作文件相关推荐

最新文章

热门文章