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 vote121 views1 answer
Vbscript Trim
VBA
1 vote130 views1 answer
Change the first item in a queue vb.net
VBA
3 votes137 views2 answers
Vba date to string
VBA
2 votes120 views1 answer
Excel vba check if key is in collection
VBA
0 vote114 views1 answer
Returns an array from function vba
VBA
0 vote179 views1 answer
Vba change active sheet
VBA
0 vote122 views1 answer
Internet explorer reference vba
VBA
0 vote125 views1 answer
Vba format currency
VBA
0 vote116 views1 answer
Excel vba copy range with filter
VBA
3 votes116 views1 answer
Vba request json
VBA