La méthode BrowseForFolder peut rendre votre application Microsoft Office Excel plus dynamique en ne vous obligeant pas à utiliser des chemins de code dur dans votre programme. La méthode BrowseForFolder vous permet d’inviter l’utilisateur à rechercher un dossier particulier dans votre ordinateur à l’aide de Visual Basic for Applications (VBA). Le chemin d’accès au dossier retourné peut être utilisé à d’autres fins de programmation, comme la lecture ou l’enregistrement d’un fichier. Réduisez la maintenabilité en n’ayant à coder aucun chemin dans votre programme.
Lancez Excel, cliquez sur l’onglet « Développeur » suivi de « Visual Basic ». Cliquez sur le menu « Insérer » et sélectionnez « UserForm » pour insérer un nouveau formulaire. Cliquez sur le menu « Affichage » et cliquez sur « Boîte à outils » pour afficher les contrôles que vous pouvez ajouter à votre formulaire.
Cliquez sur « CommandButton » sur la boîte à outils et cliquez puis faites glisser sur votre formulaire pour créer un contrôle de bouton. Ajoutez un nouveau contrôle de zone de texte en utilisant la même technique.
Double-cliquez sur le nouveau bouton pour ouvrir la fenêtre de l’éditeur Visual Basic. Tapez le code suivant sous « Private Sub CommandButton1_Click() : ».
On Error GoTo Err_CommandButton1_Click :
Tapez le code suivant pour définir deux variables que vous utiliserez dans votre programme :
Tapez le code suivant pour démarrer la méthode « BrowseForFolder » et afficher une fenêtre de dialogue pour que l’utilisateur puisse choisir un dossier :
Tapez ce qui suit pour que le dossier soit sélectionné dans la fenêtre de dialogue « BrowseForForFolder » :
Tapez ce qui suit pour ajouter le chemin d’accès sélectionné au contrôle de la zone de texte de votre formulaire :
Tapez ce qui suit pour libérer l’objet de la mémoire :
Tapez ce qui suit pour afficher une boîte de message contenant toutes les erreurs possibles et mettre fin à la procédure :
Exit_CommandButton1_Click :
Err_CommandButton1_Click :
Fin Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-Sous-
Appuyez sur « F5 » pour exécuter votre programme, puis cliquez sur « CommandButton1 » pour rechercher un dossier. Choisissez un dossier et cliquez sur « OK » Le chemin d’accès sera affiché dans la zone de texte.
Laisser un commentaire