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 vote147 views1 answer
Vba open report
VBA
0 vote137 views1 answer
Vba text to general
VBA
4 votes142 views1 answer
Excel formula for last non-empty cell in a column
VBA
1 vote148 views1 answer
Excel vba get column number from column name
VBA
0 vote150 views1 answer
Vba boolean to string
VBA
0 vote159 views1 answer
Write listbox to text file vb.net
VBA
3 votes149 views1 answer
Vba request json
VBA
0 vote159 views1 answer
Vbnet click on dgv cells
VBA
0 vote147 views1 answer
Compare dates vb
VBA
0 vote168 views1 answer
Excel vba protect shapes
VBA