Use FileDialog to get file with txt extension

[newbieX]

I can use the following code to search all files and return the value of the one I selected but do not know how to limit the files initially seen to just files with a txt extension. In effect, I only want to see files with txt extensions when searching for a file. Ideas?

Private Sub cmdGetTextFile_Click()
Dim f As Object

Set f = Application.FileDialog(3)

f.AllowMultiSelect = True

If f.Show Then
    For i = 1 To f.SelectedItems.Count
        varTextFileName = (f.SelectedItems(i))
        Me.TextfileLocation.Value = varTextFileName
        MsgBox "Text Location = " + Me.TextfileLocation.Value
    Next
End If
    
End Sub

Access 2010

[June7]

Review http://access.mvps.org/access/api/api0001.htm

[newbieX]

Well now that looks overly complex. I was hoping to just add a line or two. Too much of a novice to make sense of all that. But thanks.

[June7]

Another reference https://msdn.microsoft.com/en-us/lib...ffice.11).aspx

You need lines that clear and set the dialog filter.

In your code, would be like:
f.Filters.Clear
f.Filters.Add = "Text Files", "*.TXT", "*.CSV"

[newbieX]

Much better reference. Finally got it to work. Thank you.