OVH Cloud OVH Cloud

msgbox non modal

4 réponses
Avatar
AndréSch
Bonjour à tous

Sur les msgbox on peut ajouter des boutons vbcritical etc... et...
Vbapplicationmodal qui vaut 0

sur excel 97 ça ne change rien et si on met 1 au lieu de 0 on a un bouton
annuler en plus..

Or je voudrais pouvoir écrire sur la feuille quand la msgbox est ouverte

en fait je crée un filtre pour travailler sur l feuille et completer
certaines des lignes filtrées, je le maintien avec une msgbox et un bouton
OK.
Quand j'ai fini, je clique sur OK pour oter le filtre... comme ça on ne peut
pas l'oublier... (sauvegarder avec 2 ou trois filtres en place m'a souvent
interdit de rouvrir le fichier.. bugg)

J'ai fait ça avec un userform, mais ça ne marche que sur excel 97, avec les
autres le non modal ne fonctionne pas, je voudrais donc essayer avec un
msgbox... non modal...

En fait je me demande bien a quoi sert vbapplicationmodal puisque avec ou
sans c'est pareil et qu'on ne peut changer la valeur de ce parametre...

Merci encore aux fidels conseillers qui acceptent de perdre du temps avec
nous

André

4 réponses

Avatar
Jacques93
Bonjour AndréSch,

Le paramètre 'vbMsgBoxStyle' est une combinaison de bits, par exemple :

MsgBox "Hello", vYesNo Or VbQuestion

vbOKOnly 0 Bouton OK uniquement (valeur par défaut)
vbOKCancel 1 Boutons OK et Annuler
vbAbortRetryIgnore 2 Boutons Abandonner, Répéter et Ignorer
vbYesNoCancel 3 Boutons Oui, Non et Annuler
vbYesNo 4 Boutons Oui et Non
vbRetryCancel 5 Boutons Répéter et Annuler

vbCritical 16 Message critique
vbQuestion 32 Requête d'avertissement
vbExclamation 48 Message d'avertissement
vbInformation 64 Message d'information

vbDefaultButton1 0 Le premier bouton est le bouton par défaut
vbDefaultButton2 256 Le deuxième bouton est le bouton par défaut
vbDefaultButton3 512 Le troisième bouton est le bouton par défaut
vbDefaultButton4 768 Le quatrième bouton est le bouton par défaut

vbApplicationModal 0 Boîte de dialogue modale (valeur par défaut)
vbSystemModal 4096 Boîte de dialogue modale système

Le MsgBox est donc toujours 'Modal'. A ma connaissance la manière de
contourner cela est d'utiliser un UserForm et de l'afficher avec :

UserForm1.Show vbModeless

Bonjour à tous

Sur les msgbox on peut ajouter des boutons vbcritical etc... et...
Vbapplicationmodal qui vaut 0

sur excel 97 ça ne change rien et si on met 1 au lieu de 0 on a un bouton
annuler en plus..

Or je voudrais pouvoir écrire sur la feuille quand la msgbox est ouverte

en fait je crée un filtre pour travailler sur l feuille et completer
certaines des lignes filtrées, je le maintien avec une msgbox et un bouton
OK.
Quand j'ai fini, je clique sur OK pour oter le filtre... comme ça on ne peut
pas l'oublier... (sauvegarder avec 2 ou trois filtres en place m'a souvent
interdit de rouvrir le fichier.. bugg)

J'ai fait ça avec un userform, mais ça ne marche que sur excel 97, avec les
autres le non modal ne fonctionne pas, je voudrais donc essayer avec un
msgbox... non modal...

En fait je me demande bien a quoi sert vbapplicationmodal puisque avec ou
sans c'est pareil et qu'on ne peut changer la valeur de ce parametre...

Merci encore aux fidels conseillers qui acceptent de perdre du temps avec
nous

André





--
Cordialement,

Jacques.

Avatar
ClémentMarcotte
Bonjour,

Office 97 ne permet pas les boîtes de dialogues non modales. Ceci dit LL a
patenté quelque chose pour cela:

http://xcell05.free.fr/pages/api/usfnonmodal.htm


"AndréSch" a écrit dans le message de
news:
Bonjour à tous

Sur les msgbox on peut ajouter des boutons vbcritical etc... et...
Vbapplicationmodal qui vaut 0

sur excel 97 ça ne change rien et si on met 1 au lieu de 0 on a un bouton
annuler en plus..

Or je voudrais pouvoir écrire sur la feuille quand la msgbox est ouverte

en fait je crée un filtre pour travailler sur l feuille et completer
certaines des lignes filtrées, je le maintien avec une msgbox et un
bouton

OK.
Quand j'ai fini, je clique sur OK pour oter le filtre... comme ça on ne
peut

pas l'oublier... (sauvegarder avec 2 ou trois filtres en place m'a souvent
interdit de rouvrir le fichier.. bugg)

J'ai fait ça avec un userform, mais ça ne marche que sur excel 97, avec
les

autres le non modal ne fonctionne pas, je voudrais donc essayer avec un
msgbox... non modal...

En fait je me demande bien a quoi sert vbapplicationmodal puisque avec ou
sans c'est pareil et qu'on ne peut changer la valeur de ce parametre...

Merci encore aux fidels conseillers qui acceptent de perdre du temps avec
nous

André




Avatar
AndréSch
merci Jacques

je vais tenter comme tu dis
Clément donne d'autres solutions... je les tenterai aussi

Cordialement

André
"Jacques93" a écrit dans le message de news:
uJZd$
Bonjour AndréSch,

Le paramètre 'vbMsgBoxStyle' est une combinaison de bits, par exemple :

MsgBox "Hello", vYesNo Or VbQuestion

vbOKOnly 0 Bouton OK uniquement (valeur par défaut)
vbOKCancel 1 Boutons OK et Annuler
vbAbortRetryIgnore 2 Boutons Abandonner, Répéter et Ignorer
vbYesNoCancel 3 Boutons Oui, Non et Annuler
vbYesNo 4 Boutons Oui et Non
vbRetryCancel 5 Boutons Répéter et Annuler

vbCritical 16 Message critique
vbQuestion 32 Requête d'avertissement
vbExclamation 48 Message d'avertissement
vbInformation 64 Message d'information

vbDefaultButton1 0 Le premier bouton est le bouton par défaut
vbDefaultButton2 256 Le deuxième bouton est le bouton par défaut
vbDefaultButton3 512 Le troisième bouton est le bouton par défaut
vbDefaultButton4 768 Le quatrième bouton est le bouton par défaut

vbApplicationModal 0 Boîte de dialogue modale (valeur par défaut)
vbSystemModal 4096 Boîte de dialogue modale système

Le MsgBox est donc toujours 'Modal'. A ma connaissance la manière de
contourner cela est d'utiliser un UserForm et de l'afficher avec :

UserForm1.Show vbModeless

Bonjour à tous

Sur les msgbox on peut ajouter des boutons vbcritical etc... et...
Vbapplicationmodal qui vaut 0

sur excel 97 ça ne change rien et si on met 1 au lieu de 0 on a un bouton
annuler en plus..

Or je voudrais pouvoir écrire sur la feuille quand la msgbox est ouverte

en fait je crée un filtre pour travailler sur l feuille et completer
certaines des lignes filtrées, je le maintien avec une msgbox et un
bouton OK.
Quand j'ai fini, je clique sur OK pour oter le filtre... comme ça on ne
peut pas l'oublier... (sauvegarder avec 2 ou trois filtres en place m'a
souvent interdit de rouvrir le fichier.. bugg)

J'ai fait ça avec un userform, mais ça ne marche que sur excel 97, avec
les autres le non modal ne fonctionne pas, je voudrais donc essayer avec
un msgbox... non modal...

En fait je me demande bien a quoi sert vbapplicationmodal puisque avec ou
sans c'est pareil et qu'on ne peut changer la valeur de ce parametre...

Merci encore aux fidels conseillers qui acceptent de perdre du temps avec
nous

André



--
Cordialement,

Jacques.



Avatar
AndréSch
Merci Clement
Jacque donne une autre façon d'écrire modeless
je vais essayer vos solutions

Merci encore
Amitiés

André
"ClémentMarcotte" a écrit dans le message de
news: OI%
Bonjour,

Office 97 ne permet pas les boîtes de dialogues non modales. Ceci dit LL a
patenté quelque chose pour cela:

http://xcell05.free.fr/pages/api/usfnonmodal.htm


"AndréSch" a écrit dans le message de
news:
Bonjour à tous

Sur les msgbox on peut ajouter des boutons vbcritical etc... et...
Vbapplicationmodal qui vaut 0

sur excel 97 ça ne change rien et si on met 1 au lieu de 0 on a un bouton
annuler en plus..

Or je voudrais pouvoir écrire sur la feuille quand la msgbox est ouverte

en fait je crée un filtre pour travailler sur l feuille et completer
certaines des lignes filtrées, je le maintien avec une msgbox et un
bouton

OK.
Quand j'ai fini, je clique sur OK pour oter le filtre... comme ça on ne
peut

pas l'oublier... (sauvegarder avec 2 ou trois filtres en place m'a
souvent
interdit de rouvrir le fichier.. bugg)

J'ai fait ça avec un userform, mais ça ne marche que sur excel 97, avec
les

autres le non modal ne fonctionne pas, je voudrais donc essayer avec un
msgbox... non modal...

En fait je me demande bien a quoi sert vbapplicationmodal puisque avec ou
sans c'est pareil et qu'on ne peut changer la valeur de ce parametre...

Merci encore aux fidels conseillers qui acceptent de perdre du temps avec
nous

André