Invalid use of Me keyword

[tariq1]

I receive 'Invalid Use of Me keyword' with the following code. Your help is much appreciated

Sub Print_Field_Names()
Dim rst As Recordset
Dim intl As Integer
Dim fld As Field
Set rst = Me.RecordsetClone
For Each fld In rst.Fields
debug.Print fld
Next
End Sub

[pbaldy]

Where is the code located? If in a standard module, that's your problem.

[tariq1]

Thank you Paul, yes the code is located in the standard module. I have now rectified the issue.

Tariq

[pbaldy]

Happy to help.