I have the following button code - how can I modify it so only a single .cvs
file can be chosen?

Private Sub btnETran_Click()
Dim lngCount As Long

' Open the file dialog
With Application.FileDialog(msoFileDialogOpen)
.AllowMultiSelect = False
.Show

' Display paths of each file selected
For lngCount = 1
MsgBox .SelectedItems(lngCount)
Next lngCount

End With

End Sub

Thanks