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 vote170 views1 answer
Amd64 vs arm64 linux
VBA
1 vote137 views1 answer
Vba refresh pivot table
VBA
4 votes151 views1 answer
VBA Deep Clone Dictionary
VBA
0 vote143 views1 answer
Excel vba disable keyboard input
VBA
0 vote136 views1 answer
Vba collection key list
VBA
0 vote168 views2 answers
Get unique random number in vb.net
VBA
0 vote192 views1 answer
Find control with name vb
VBA
0 vote155 views1 answer
How to add line graph vb net
VBA
8 votes220 views1 answer
Excel vba determine number of elements in a 1D array
VBA
5 votes176 views1 answer
Vba low word from Long Integer
VBA