OVH Cloud OVH Cloud

Controle supplémentaire manquant

3 réponses
Avatar
Sabian
Pour une boite de dialogue de type "Parcourir" (Ouvrir,=20
Enregistrer sous,...)=20
il faut installer sur la UserForm un contr=F4le CommonDialog=20
(via clic droit sur=20
la boite =E0 outils puis Contr=F4les compl=E9mentaires, il=20
s'agit de Microsoft common=20
Dialog box).
=20
Ce contr=F4le contient plusieurs m=E9thodes=20
comme .showOpen, .showsave...
=20
On a alors, comme macro =E9v=E8nementielle sur le bouton
Private Button1_click()
commonDialog1.ShowOpen
End Sub

ps: Je n'ai pas ce controle dans ma liste de controles=20
suppl=E9mentaire... Comment faire pour l'avoir... ???

Merci de votre aide

3 réponses

Avatar
Hervé
Salut Sabian,
Je peux me tromper mais il est avec VB et non VBA.
Hervé.
"Sabian" a écrit dans le message news:
0af801c3a39b$a8945e60$
Pour une boite de dialogue de type "Parcourir" (Ouvrir,
Enregistrer sous,...)
il faut installer sur la UserForm un contrôle CommonDialog
(via clic droit sur
la boite à outils puis Contrôles complémentaires, il
s'agit de Microsoft common
Dialog box).

Ce contrôle contient plusieurs méthodes
comme .showOpen, .showsave...

On a alors, comme macro évènementielle sur le bouton
Private Button1_click()
commonDialog1.ShowOpen
End Sub

ps: Je n'ai pas ce controle dans ma liste de controles
supplémentaire... Comment faire pour l'avoir... ???

Merci de votre aide
Avatar
Sabian
ce qui par conséquant règle le problème...

Merci des info...

a++

-----Message d'origine-----
Salut Sabian,
Je peux me tromper mais il est avec VB et non VBA.
Hervé.
"Sabian" a écrit dans le message news:
0af801c3a39b$a8945e60$
Pour une boite de dialogue de type "Parcourir" (Ouvrir,
Enregistrer sous,...)
il faut installer sur la UserForm un contrôle CommonDialog
(via clic droit sur
la boite à outils puis Contrôles complémentaires, il
s'agit de Microsoft common
Dialog box).

Ce contrôle contient plusieurs méthodes
comme .showOpen, .showsave...

On a alors, comme macro évènementielle sur le bouton
Private Button1_click()
commonDialog1.ShowOpen
End Sub

ps: Je n'ai pas ce controle dans ma liste de controles
supplémentaire... Comment faire pour l'avoir... ???

Merci de votre aide




.



Avatar
Clément Marcotte
Bonjour,

Pour le contrôle Commondialogs, il faut effectivement avoir VB. Ceci
dit, tu peux jeter un oeil là-dessus:

http://fred.just.free.fr/francais/activex/ChooseFile.html


"Sabian" a écrit dans le message de
news:0af801c3a39b$a8945e60$
Pour une boite de dialogue de type "Parcourir" (Ouvrir,
Enregistrer sous,...)
il faut installer sur la UserForm un contrôle CommonDialog
(via clic droit sur
la boite à outils puis Contrôles complémentaires, il
s'agit de Microsoft common
Dialog box).

Ce contrôle contient plusieurs méthodes
comme .showOpen, .showsave...

On a alors, comme macro évènementielle sur le bouton
Private Button1_click()
commonDialog1.ShowOpen
End Sub

ps: Je n'ai pas ce controle dans ma liste de controles
supplémentaire... Comment faire pour l'avoir... ???

Merci de votre aide