Vba selection repertoire
Résolu
africatrek
-
Sergio -
Sergio -
A voir également:
- Vba boite de dialogue pour sélectionner un dossier
- Dossier appdata - Guide
- Impossible de supprimer un dossier - Guide
- Mettre un mot de passe sur un dossier - Guide
- Boite gmail saturée - Guide
- Dialogue boost - Accueil - Guide streaming
3 réponses
Salut,
Tu dois tester le nombre d'items sélectionnés:
Sub test()
Dim Repertoire As FileDialog
Set Repertoire = Application.FileDialog(msoFileDialogFolderPicker)
Repertoire.Show
If Repertoire.SelectedItems.Count > 0 Then
MsgBox Repertoire.SelectedItems(1)
Else
MsgBox "Aucun Répertoire Sélectionné"
End If
End Sub
Cordialement.
Tu dois tester le nombre d'items sélectionnés:
Sub test()
Dim Repertoire As FileDialog
Set Repertoire = Application.FileDialog(msoFileDialogFolderPicker)
Repertoire.Show
If Repertoire.SelectedItems.Count > 0 Then
MsgBox Repertoire.SelectedItems(1)
Else
MsgBox "Aucun Répertoire Sélectionné"
End If
End Sub
Cordialement.
amanar
Merci
Sergio
Merci !