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 vote205 views1 answer
Vb get ip address
VBA
1 vote2K views1 answer
Vba Remove Case Sensitivity
VBA
1 vote207 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote219 views2 answers
Vba remove line breaks
VBA
2 votes224 views1 answer
Excel vba extract file name
VBA
0 vote200 views1 answer
Quit excel with save changes dialog vb.net
VBA
0 vote185 views1 answer
Vbnet make a string to unicode converter
VBA
0 vote245 views1 answer
Vba cell all borders
VBA
27 votes473 views2 answers
Vba check if file exists
VBA
0 vote202 views1 answer
Vb net check if file exists
VBA