“Excel VBA Loop melalui file di folder” Kode Jawaban

VBA Loop melalui file di folder

'The short version
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("SELECT * FROM Contacts")
If Not (rs.EOF And rs.BOF) Then
	Do Until rs.EOF = True
		rs.MoveNext
	Loop
End If
rs.Close
Set rs = Nothing
Saphirah

Excel VBA Loop melalui file di folder

Sub LoopThroughFiles()
    Dim StrFile As String
    StrFile = Dir("c:\testfolder\*test*")
    Do While Len(StrFile) > 0
        Debug.Print StrFile
        StrFile = Dir
    Loop
End Sub
Purple Tentacle

Jawaban yang mirip dengan “Excel VBA Loop melalui file di folder”

Pertanyaan yang mirip dengan “Excel VBA Loop melalui file di folder”

Lebih banyak jawaban terkait untuk “Excel VBA Loop melalui file di folder” di VBA

Jelajahi jawaban kode populer menurut bahasa

Jelajahi bahasa kode lainnya