VBA讀取檔案

2021-07-25 13:42:51 字數 903 閱讀 2499

首先我們需要認識幾個相關定義

filesystemobject

檔案系統定義

set fs = createobject("scripting.filesystemobject")

set a = fs.createtextfile("c:\testfile.txt", true)

a.writeline("this is a test.")

a.close

以上是offices2010裡頭的一段**。

定義檔案系統→建立檔案→寫內容→關閉檔案

folder

資料夾

dim fld

set fld = fs.getfolder(folderspec)

取得已有資料夾。

file

檔案

dim f

set f = fs.getfile(filespec)

顧名思義,取得已有檔案。

有了以上概念我們就很容易寫出乙個讀取資料夾寫檔案的程式了

dim fs as

new filesystemobject

dim fld as folder

dim f as file

dim filenameco as

new collection

set fld = fs.getfolder(path)

foreach f in fld.files

filenameco.add f.path

next

'釋放記憶體

set f = nothing

set fld = nothing

set fs = nothing

VBA 選擇檔案

option explicit sub 開啟檔案 dim filenameobj as variant dim afile as variant 陣列,提取檔名filename時使用 開啟檔案對話方塊返回的檔名,是乙個全路徑檔名,其值也可能是false,因此型別為variant dim filena...

VBA研究 VBA提供的檔案操作

最近乙個學習vba的同事問我如何用vba修改檔名,我給他說了一下方法,順便也整理一下常用的幾種操作方法。這兒說的檔案操作是指作業系統級別的,不是開啟檔案,對檔案內容操作。我們當然可以建立檔案系統物件操作檔案,但是,最簡單的還是使用vba提供的標準的檔案操作功能。最常見的就是檔案或資料夾的增 刪 改。...

VBA 讀寫ini檔案

在vba中必須通過呼叫win32 api來實現ini檔案讀寫。option explicit read private declare function getprivateprofilestring lib kernel32 alias getprivateprofilestringa byval...