Désolé si le titre de ce post n'est pas très explicite, je vais tâcher de
faire mieux
dans le corps du message ;-)
J'ai créé un classeur qui contient un module VBA que j'ai rendu invisible
grâce à vous, les généreux du code ;-)
Je voudrais améliorer mon application en personnalisant, par exemple, les
boîtes de dialogue.
Au lieu d'utiliser une simple MSGBOX, je voudrais afficher une boîte de
dialogue
personnalisée, qui par exemple, pourrait juste être une image en forme de
personnage avec un texte déjà imprimé dedans.
Mais il faudrait au moins un bouton dedans pour pouvoir la refermer ;-) !!
Est-il possible de faire cela ?
Si oui, comment ? (contrôle active x, etc...)
Si trop complexe à expliquer dans un simple post, avez-vous de bons liens à
me proposer ?
Maintenant, quelque soit la nature du futur objet, je voudrais savoir
comment l'INTÉGRER
dans le classeur !!
Le but rechercher est que l'objet extérieur soit complètement intégré dans
le classeur pour
éviter à tout pris l'utilisation d'un fichier externe !!!
Ce point est très important pour moi !!!!!!!!!!!!!
C'est un classeur qui se promène constamment, il faut absolument qu'il soit
autonome, sans attache.
Si pas de moyen, j'imaginais une solution dans le module ou une feuille
cachée (si c'est possible):
Par exemple, mettre le code sous forme de ligne dans la module à la façon
d'une pièce jointe dans un mail.
Ensuite une routine pour reconstruire l'objet .
Je délire là, non ? :D
@+
Yvan
--
Enlever YYXXZZ de mon mail si réponse sur celle-ci, merci ;-)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
AV
Si j'ai compris.... Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la nommes et tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin Exemple : sub zz() ActiveSheet.Shapes("monImage").Visible = true le traitement ActiveSheet.Shapes("monImage").Visible = false end sub
AV
Si j'ai compris....
Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la nommes et
tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin
Exemple :
sub zz()
ActiveSheet.Shapes("monImage").Visible = true
le traitement
ActiveSheet.Shapes("monImage").Visible = false
end sub
Si j'ai compris.... Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la nommes et tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin Exemple : sub zz() ActiveSheet.Shapes("monImage").Visible = true le traitement ActiveSheet.Shapes("monImage").Visible = false end sub
AV
Yvan
Bonjour,
C'est une idée, je vais essayer, mais ce n'est pas un control !!
Merci
Yvan "AV" a écrit dans le message de news:
Si j'ai compris.... Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la nommes et tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin Exemple : sub zz() ActiveSheet.Shapes("monImage").Visible = true le traitement ActiveSheet.Shapes("monImage").Visible = false end sub
AV
Bonjour,
C'est une idée, je vais essayer, mais ce n'est pas un control !!
Merci
Yvan
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
OQHmxqc3EHA.2624@TK2MSFTNGP11.phx.gbl...
Si j'ai compris....
Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la
nommes et
tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin
Exemple :
sub zz()
ActiveSheet.Shapes("monImage").Visible = true
le traitement
ActiveSheet.Shapes("monImage").Visible = false
end sub
C'est une idée, je vais essayer, mais ce n'est pas un control !!
Merci
Yvan "AV" a écrit dans le message de news:
Si j'ai compris.... Tu te fabriques une image ou tu l'importes et tu la bidouilles; tu la nommes et tu la colles sur une feuille
Ensuite tu la fait apparaitre au début d'une macro et disparaitre à la fin Exemple : sub zz() ActiveSheet.Shapes("monImage").Visible = true le traitement ActiveSheet.Shapes("monImage").Visible = false end sub