quando chiami writeToTable ci deve essere cmdlg_file:
writeToTable cmdlg_file
praticamente la mia funzione richiede un tipo di dati Stringa, la funzione cmdlg_file restituisce un tipo di dati stringa, pertanto dovrebbe funzionare...
Ah OK, TROVATO:
devi correggere così questa funzione:
Public Function cmdlg_file() As String
Dim OpenFile As OPENFILENAME
Dim lReturn As Long
Dim sFilter As String
OpenFile.lStructSize = Len(OpenFile)
[continua....]
probabilmente il problema sta lì.
