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 vote211 views1 answer
Vba border weight
VBA
0 vote224 views1 answer
Sort dictionary by key vba
VBA
0 vote199 views1 answer
Vba argument is set
VBA
0 vote224 views1 answer
Loop through all text boxes in a form vb
VBA
0 vote210 views1 answer
Check range is in another range vba
VBA
5 votes214 views1 answer
Excel vba high word from Long Integer
VBA
6 votes244 views1 answer
Excel vba isalpha
VBA
1 vote214 views1 answer
Excel vba get column name from number
VBA
0 vote234 views2 answers
S yyyy-MM-dd em vb net
VBA
3 votes218 views1 answer
Excel vba last row in range
VBA