Buonasera,
mi trovo con un problema con l'applicazione in oggetto, in particolare non mi legge la parte iniziale del percorso ai file: ho la routine seguente che mi apre la file dialog su doppio click di un controllo textbox:
Private Sub frmOEctrIPEtabOElinkofferta_DblClick(Cancel As Integer)
On Error GoTo Err_frmOEctrIPEtabOElinkofferta_DblClick
Dim fDialog As Office.FileDialog
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
.AllowMultiSelect = False
.InitialFileName = "\\costampsrv\preventivi\"
.Title = "Inserire percorso file"
.Filters.Clear
.Filters.Add "Acrobat Files", "*.pdf"
If .Show = True Then
Me.frmOEctrIPEtabOElinkofferta.Value = .SelectedItems(1)
Else
MsgBox "Nessun file selezionato", vbOKOnly
End If
End With
Exit_Err_frmOEctrIPEtabOElinkofferta_DblClick:
Exit Sub
Err_frmOEctrIPEtabOElinkofferta_DblClick:
MsgBox Err.Description
Resume Exit_Err_frmOEctrIPEtabOElinkofferta_DblClick
End Sub
Con quel percorso la finestra si apre sulla cartella di default di Office, mentre se elimino “preventivi” e lascio solo “\\costampsrv\” la finestra si apre su quel percorso di rete e da li' posso poi accedere alla cartella preventivi…
Da cosa puo' dipendere?