Parcourir!!!!!!!

Bonjour, j'ai 1énorme problème en VBA!

Je suis censé réaliser 1boite de dialogue, qui permettra le parcours du disque dur afin de trouver 1fichier word et le stocker dans un textbox de type lien hypertexte!

Cette boite de dialogue, sera lancée par le clic sur 1bouton!

Je n'ai pas la moindre idée de comment réalier cela; de plus, je ne maitrise pas du tout la programmation et encore moins celle en vba!!!!!!!!!

toute aide sera la bienvenue!!!!!!!!!!!

Merci d'avance, ciao tof

salut,
alors tout d'abord tu ajoute le composant microsoft common dialog (projet-composants)

sur l'evenement click tu mets

Private Sub Command1_Click()
'ça filtre les docs excel et word, tu peux changer les extensions voulus (*.doc par exemple) et devant ce sont les description (word) que tu peux changer aussi
CommonDialog1.Filter = "word|*.doc|excel|*.xls"
CommonDialog1.ShowOpen
file = CommonDialog1.FileName
'on met le chemin du fichier dans un textbox mais tu peux en faire ce que tu veux c'est juste un exemple ;-)
Text1.Text = file
End Sub

voila j'espere t'avoir aidé..
n'hésite pas...
@+


-------------------------------
Réponse au message :
-------------------------------

> Bonjour, j'ai 1énorme problème en VBA!
>
> Je suis censé réaliser 1boite de dialogue, qui permettra le parcours du disque dur afin de trouver 1fichier word et le stocker dans un textbox de type lien hypertexte!
>
> Cette boite de dialogue, sera lancée par le clic sur 1bouton!
>
> Je n'ai pas la moindre idée de comment réalier cela; de plus, je ne maitrise pas du tout la programmation et encore moins celle en vba!!!!!!!!!
>
> toute aide sera la bienvenue!!!!!!!!!!!
>
> Merci d'avance, ciao tof

Salut, je te remercie de ton aide, je viens d'essayer d'insérer le composant que tu m'as dit, seulement, il y a comme qui dirait 1ti problème de licence!!! je sais pas ce qu'il veut et pourquoi il veut pas, mais j'essaierais de nouveau demain dès la première heure au bureau!!!!!

Merci de ton aide et je te tiens au courant!!!!




-------------------------------
Réponse au message :
-------------------------------

> salut,
> alors tout d'abord tu ajoute le composant microsoft common dialog (projet-composants)
>
> sur l'evenement click tu mets
>
> Private Sub Command1_Click()
> 'ça filtre les docs excel et word, tu peux changer les extensions voulus (*.doc par exemple) et devant ce sont les description (word) que tu peux changer aussi
> CommonDialog1.Filter = "word|*.doc|excel|*.xls"
> CommonDialog1.ShowOpen
> file = CommonDialog1.FileName
> 'on met le chemin du fichier dans un textbox mais tu peux en faire ce que tu veux c'est juste un exemple ;-)
> Text1.Text = file
> End Sub
>
> voila j'espere t'avoir aidé..
> n'hésite pas...
> @+
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Bonjour, j'ai 1énorme problème en VBA!
> >
> > Je suis censé réaliser 1boite de dialogue, qui permettra le parcours du disque dur afin de trouver 1fichier word et le stocker dans un textbox de type lien hypertexte!
> >
> > Cette boite de dialogue, sera lancée par le clic sur 1bouton!
> >
> > Je n'ai pas la moindre idée de comment réalier cela; de plus, je ne maitrise pas du tout la programmation et encore moins celle en vba!!!!!!!!!
> >
> > toute aide sera la bienvenue!!!!!!!!!!!
> >
> > Merci d'avance, ciao tof
>

-------------------------------
Réponse au message :
-------------------------------

> Salut, je te remercie de ton aide, je viens d'essayer d'insérer le composant que tu m'as dit, seulement, il y a comme qui dirait 1ti problème de licence!!! je sais pas ce qu'il veut et pourquoi il veut pas, mais j'essaierais de nouveau demain dès la première heure au bureau!!!!!
>
> Merci de ton aide et je te tiens au courant!!!!
>
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > salut,
> > alors tout d'abord tu ajoute le composant microsoft common dialog (projet-composants)
> >
> > sur l'evenement click tu mets
> >
> > Private Sub Command1_Click()
> > 'ça filtre les docs excel et word, tu peux changer les extensions voulus (*.doc par exemple) et devant ce sont les description (word) que tu peux changer aussi
> > CommonDialog1.Filter = "word|*.doc|excel|*.xls"
> > CommonDialog1.ShowOpen
> > file = CommonDialog1.FileName
> > 'on met le chemin du fichier dans un textbox mais tu peux en faire ce que tu veux c'est juste un exemple ;-)
> > Text1.Text = file
> > End Sub
> >
> > voila j'espere t'avoir aidé..
> > n'hésite pas...
> > @+
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Bonjour, j'ai 1énorme problème en VBA!
> > >
> > > Je suis censé réaliser 1boite de dialogue, qui permettra le parcours du disque dur afin de trouver 1fichier word et le stocker dans un textbox de type lien hypertexte!
> > >
> > > Cette boite de dialogue, sera lancée par le clic sur 1bouton!
> > >
> > > Je n'ai pas la moindre idée de comment réalier cela; de plus, je ne maitrise pas du tout la programmation et encore moins celle en vba!!!!!!!!!
> > >
> > > toute aide sera la bienvenue!!!!!!!!!!!
> > >
> > > Merci d'avance, ciao tof
> >
>

Oups dsl!!!! pas fait exprès!!!!

En fait, je n'arrive pas avec microsoft common dialog, d'une oart, l'objet n'est pas visible en mode formulaire et si je mets en visible a true, il me mets 1msg d'erreur comme quoi je n'ai pas le droit de le mettre a true!

De plus, comme il n'y a pas d'événement sur clic, je l'ai mis sur get focus mais bon, il a pas trop l'air d'aimer!

merci à ceux qui pourront m'aider!!!!


-------------------------------
Réponse au message :
-------------------------------

>
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Salut, je te remercie de ton aide, je viens d'essayer d'insérer le composant que tu m'as dit, seulement, il y a comme qui dirait 1ti problème de licence!!! je sais pas ce qu'il veut et pourquoi il veut pas, mais j'essaierais de nouveau demain dès la première heure au bureau!!!!!
> >
> > Merci de ton aide et je te tiens au courant!!!!
> >
> >
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > salut,
> > > alors tout d'abord tu ajoute le composant microsoft common dialog (projet-composants)
> > >
> > > sur l'evenement click tu mets
> > >
> > > Private Sub Command1_Click()
> > > 'ça filtre les docs excel et word, tu peux changer les extensions voulus (*.doc par exemple) et devant ce sont les description (word) que tu peux changer aussi
> > > CommonDialog1.Filter = "word|*.doc|excel|*.xls"
> > > CommonDialog1.ShowOpen
> > > file = CommonDialog1.FileName
> > > 'on met le chemin du fichier dans un textbox mais tu peux en faire ce que tu veux c'est juste un exemple ;-)
> > > Text1.Text = file
> > > End Sub
> > >
> > > voila j'espere t'avoir aidé..
> > > n'hésite pas...
> > > @+
> > >
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > Bonjour, j'ai 1énorme problème en VBA!
> > > >
> > > > Je suis censé réaliser 1boite de dialogue, qui permettra le parcours du disque dur afin de trouver 1fichier word et le stocker dans un textbox de type lien hypertexte!
> > > >
> > > > Cette boite de dialogue, sera lancée par le clic sur 1bouton!
> > > >
> > > > Je n'ai pas la moindre idée de comment réalier cela; de plus, je ne maitrise pas du tout la programmation et encore moins celle en vba!!!!!!!!!
> > > >
> > > > toute aide sera la bienvenue!!!!!!!!!!!
> > > >
> > > > Merci d'avance, ciao tof
> > >
> >
>

Pour le pb de license faut installer visual basic et pas que access

Je travaille avec visual basic pour access,j'ai introduit un boutton PARCOURIR avec le code ci dessous(qui me signale une erreur!)

Private Sub bouttonParcourir_click()

CommonDialog1.Filter = "word|*.doc"
CommonDialog1.ShowOpen
file = CommonDialog1.FileName
champTexte.Text = file

End Sub

Je voulais savoir pourquoi ça ne marche pas!
Je trouve pas dans microsoft common dialog,projet_composants figure pas dans le menu
j'ai bien chercher mais je trouve rien
Peut etre que ç dans outils/references!?
Veuillez bien m'aider
car ceci bloque mon travail
Merci