Vba loop through files in 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

Source: stackoverflow.com

Similar codes

0 vote271 views1 answer
Vba excel parser xml
VBA
0 vote221 views1 answer
Vbs send keys
VBA
0 vote259 views1 answer
Excel vba scroll to cell
VBA
0 vote243 views1 answer
Vba random number
VBA
20 votes535 views1 answer
Excel vba factorial
VBA
1 vote230 views1 answer
Excel vba get column number from column name
VBA
0 vote237 views1 answer
Vba copy file
VBA
1 vote218 views1 answer
Close form vba
VBA
0 vote243 views1 answer
Vba clear collection
VBA
1 vote258 views1 answer
Vba format string as cash
VBA