PDA

View Full Version : [SOLVED] Opening unknown File names in known Folder



Edmond
11-21-2018, 09:07 AM
Hello everyone,

I am trying to open a xls unknown file in a known folder. But with no success so far. I googled it and find this code:


Sub OpenFiles()Const FOLDER_NAME As String = "c:\Users\Edmond\Documents\Other"
Dim NextFile As String


NextFile = Dir(FOLDER_NAME & "*.xlsx", vbNormal)




If (Len(NextFile) > 0) Then
MsgBox "found " & NextFile
End If


End Sub


Unfortunately, it doesn't work. Would you have an idea why?

Many thanks in advance for your help

Jan Karel Pieterse
11-21-2018, 09:28 AM
There must be a pathseparator between FOLDERNAME and *.xlsx :

NextFile = Dir(FOLDER_NAME & "\*.xlsx", vbNormal)

Edmond
11-21-2018, 09:31 AM
Great!! Thanks a lot!