High-Tech Santé Médecine Droit-Finances

Connecter

sa Xbox 360

au Xbox Live

Rechercher : dans
Par :

Création d'une boite de dialogue dans VBA

Dernière réponse le 25 sep 2008 à 23:20:58 CBRiste31, le 21 sep 2008 à 16:49:19 
 Signaler ce message aux modérateurs

Bonjour,

Je suis en train de créer une macro dans laquelle il faut à un moment donné interrompre son déroulement en faisant apparaitre une boite de dialogue du genre" verifier les montants" et proposant de cliquer sur "ok" si le résultat est bon.
A ce moment là, la macro se poursuivrait...



Merci d'avance pour vos idées...

Configuration: Windows XP
Internet Explorer 7.0

Meilleures réponses pour « Création d'une boite de dialogue dans VBA » dans :
[VB6/VBA] Le contrôle CommonDialog. VoirLes différentes fonctions du contrôle CommonDialog J'ai laissé toutes les constantes disponibles bien qu'elles ne sont pas toutes utilisées dans les fonctions proposées, elles permettront d'éventuelles recherches sur d'autres données...
Javascript - les boîtes de dialogue VoirQu'est-ce qu'une boîte de dialogue? Une boîte de dialogue est une fenêtre qui s'affiche au premier plan suite à un événement, et qui permet Soit d'avertir l'utilisateur Soit le confronter à un choix Soit lui demander de compléter un champ pour...
Posez votre question Répondre

1

Mike-31, le 21 sep 2008 à 23:38:46

Salut,

intégre ce code dans ta macro

Msg = "Pour continuer cliquer sur OK"
StyleBoîteDialogue = vbYesNo + vbCritical + vbDefaultButton2
Title = "verifier les montants"
réponse = Msgbox(Msg, StyleBoîteDialogue, Title)
If réponse = vbNo Then
Exit Sub
Else
Range("A5").Select 'ici poursuite du code macro etc ...
End If

A+

   
Répondre à Mike-31

2

CBRiste31, le 22 sep 2008 à 20:36:03

Merci Mike-31,

Je le teste demain dans ma macro...et te tiendrai au courant.

a+

   
Répondre à CBRiste31

3

CBRiste31, le 23 sep 2008 à 20:25:50

Hello Mike-31,

J'ai integré tes formules dans mon module et cela fonctionne parfaitement.

Le petit "hic", c'est que je dois vérifier visuellement les montants de la feuille "traitée" et une feuille d'un autre fichier excel ouvert.


La boite de dialogue crée dans le module m'empêche de sélectionner la feuille du 2ème fichier ouvert...

Y'a t-il une solution ?

Merci pour ta réponse...
a+

   
Répondre à CBRiste31

4

Mike-31, le 23 sep 2008 à 21:49:10

Salut,

Surement que l'on peut remédier à ce problème, mets sur le forum un exemple de tes fichier ne contenant pas de données personnelles, et porte de annotations sur les cellule ou colonnes qui te posent problème et le résultat escompter. comme il s'agit de deux fichiers, sont il dans le même répertoire !

http://www.cjoint.com/

A+

   
Répondre à Mike-31

8

CBRiste31, le 25 sep 2008 à 18:39:33

Bjr Mike-31 & eric,

Merci de votre proposition, mais les fichiers en question (qui sont éffectivement dans le même répertoir), concernent une entreprise et toutes les données sont confidentielles.
Il n'y aurait plus aucun intérêt de vous envoyer les fichiers si la quasi totalité des cellules est éffacée.
De plus, les 2 montants totaux qui s'affichent dans leur fichier respectif, ne seront pas toujours dans les mêmes cellules...C'est pour cela que je parlais d'une vérification "manuelle" càd visuelle si vous préferez, de la part de l'utilisateur qui doit consolider les données.

Le plus simple aurait été qu'au moment ou la boite de dial. "verifiez les montants" s'affiche, on puisse zapper entre les 2 fichiers pour contrôler visuellement, puis si ils sont identiiques, on clique sur "ok" du fichier qu'on traite et la macro se poursuit.

Je comprends bien qu'en l'état ce n'est pas possible.

Va peut-être falloir que je fasse 2 macros séparées et qu'entre les 2 l'utilsateur procède à la vérif.

Bon c'est vrai, ça fait - pro mais en même temps, je ne suis pas un pro de VBA...

Si vous avez des idées, je dis pas non ;-) sinon merci pour vos précédentes réponses...

Sûrement à bientôt...Je pense que j'aurai encore besoin de votre expérience...
a+

   
Répondre à CBRiste31

5

eriiic, le 23 sep 2008 à 22:54:45

Bonsoir,

Il faudrait que tu dessines ton propre formulaire (insertion userform dans vba) et que tu l'appelles avec nomdetonuserform.Show modal.
Là les autres feuilles seront accessibles.
Je ne pense pas que ce soit possible avec msgbox()
eric

   
Répondre à eriiic

6

Mike-31, le 24 sep 2008 à 13:21:45

Salut Eriiic,

Tout à fait d'accord avec toi, si on rajoute des contrôles, la demarche risque ne plus être la même, c'est pour cela qu'il vaut mieux avoir une copie et nous jugerons.

Bonne journée

A+

   
Répondre à Mike-31

7

eriiic, le 24 sep 2008 à 19:19:17

Bonsoir,

c'est vrai que ça sera plus simple de lui mettre sur son fichier.
A+
eric

   
Répondre à eriiic

9

 Mike-31, le 25 sep 2008 à 23:20:58

Salut,

Dommage que l'on ne puisse pas avoir un modèle modifié cela aurait été plus simple, enfin on va essayer de faire avec, un forum qui se respecte ne recule pas.

Bon après la boite de dialogue on pourrait poursuivre le code macro qui contrôlerait si les colonnes sont identiques mais c’est peu probable d’après ton dernier post. par contre si les totaux se trouvent toujours à la fin de chaque colonne, il est possible de les contrôler si les deux totaux sont exact une boite de dialogue peut le signaler ou dénoncer si cela est faut.

Et sur chaque fichier je conseillerai de créer un lien dynamique qui te permettrai de passer d’un fichier à l’autre pour tes contrôles.

Peut être notre grand maître Eriiic que je salut au passage à une autre solution.

La nuit porte conseil

A+

   
Répondre à Mike-31
Posez votre question Répondre
Ils ont besoin de votre aide