directory cartella

Hai un problema con Excel?

Nuova discussione

directory cartella
di rita (utente non iscritto) data: 18/03/2013 08:51:01
Ciao a tutti, l'istruzione qi sotto mi permette di selezionare una cartella in una directory
qualcuno sa come poter una volta selezionato la cartella restituire ad una variabile il percorso della cartella selezionata?

Sub CARTELLA()
    Dim FileNameZip, FolderName, oFolder
    Dim strDate As String, DefPath As String
    Dim oApp As Object
    Set oApp = CreateObject("Shell.Application")
    Set oFolder = oApp.BrowseForFolder(0, "SELEZIONA LA CARTELLA ", 512)
End Sub

di HarryBosch data: 18/03/2013 09:36:28
Ciao Rita
ti mostro una funzione molto utile dell'editor vba.

Vai su -->Visualizza -->Finestra variabili locali

Ora, sull'istruzione "End Sub" imposta l'interruzione di riga (F9); avvia la macro e seleziona la cartella.
Nella finestra delle variabili locali, troverai tutte le informazioni assunte da ogni variabile.
Se "sviluppi" la variabile "oFolder" troverai quello che stai cercando nella colonna dei valori:
OFolder - Title - "Cartella selezionata"
... MsgBox oFolder.Title
di rita (utente non iscritto) data: 18/03/2013 10:08:06
grazie per la solerte risposta
di RITA (utente non iscritto) data: 18/03/2013 10:28:40
ho provato e mi viene restituito il nome della cartella ma a me servirebbe tutto il percorso ossia c:.......
dove lo posso trovare
di HarryBosch data: 18/03/2013 10:34:27
Cercando sempre nelle variabili locali, ho trovato:
oFolder -->self -->Path
MsgBox oFolder.self.Path
di RITA (utente non iscritto) data: 18/03/2013 10:48:48
ero arrivata anche io
grazie grazie grazie

Vuoi Approfondire?