Apertura file da form



  • Apertura file da form
    di marpav (utente non iscritto) data: 11/04/2014 00:11:26

    buongiorno avrei necessita di far aprire un file inserendolo da userform, ora ho inserito il percorso fisso del file che mi interessa, ma sarebbe possibile far scegliere all'utilizzatore della form il percorso e il file?



  • di garziagiuseppe data: 11/04/2014 07:19:45

    Puoi abbinare ad un pulsante l'istruzione sotto e adattarla indicando il percorso della cartella che desideri. Si aprirà la finestra delle risorse del computer dove l'utente potrà sfogliare e aprire il file che desidera.
     
    Shell "explorer C:UserspippoDesktop"



  • di lepat (utente non iscritto) data: 11/04/2014 07:35:18

    allega un file di esempio con quello che vorresti ottenere, ma tieni presente che sarebbe molto più semplice farlo senza userform, vedi codice allegato
     
    Sub Opendialog()
    Dim strFile As String, strPath As String
        With Application.FileDialog(msoFileDialogOpen)
            .InitialFileName = ThisWorkbook.Path & "*.xls*"
            .Title = "Please Select a File"
            .AllowMultiSelect = False
            .Show
            If .SelectedItems.Count = 0 Then Exit Sub   
            strFile = .SelectedItems(1)
        End With
          Set mybook = Workbooks.Open(strFile)
    ' ---------- tuo codice
    End Sub