cs_ludwig89
Messages postés47Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention18 septembre 2009
-
1 sept. 2004 à 11:15
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 2009
-
1 sept. 2004 à 12:42
bonjour je suis un peu paumé
dans excel 97
je voudrai afficher la boite de dialogue ouvrir avec toute l'arborescence de windows, pouvoir cliquer sur un repertoire ou un fichier et mettre le chemin du fichier ou du repertoire dans une cellule ou dans une variables
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 20099 1 sept. 2004 à 12:42
POur Completer Econs....ne pas oublier de gerer le bouton Annuler..
Voila un code un peu plus compler..a toi de l'arranger a ton Besoin.
Private Sub Command1_Click()
On Error GoTo Cancel
CommonDialog.FileName = ""
CommonDialog.Filter = "Fichier WORD (*.Doc)|*.Doc"
CommonDialog.Flags = cdlOFNLongNames Or cdlOFNFileMustExist Or cdlOFNHideReadOnly Or cdlOFNPathMustExist ' Options de la Boîte de Dialogue
CommonDialog.ShowOpen
MsgBox CommonDialog.FileName