Icône de la ressource

VBA - MsgBox personnalisé paramétrable en taille et couleur de texte, de boutons et en position V12

  • Initiateur de la discussion Initiateur de la discussion Dudu2
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Bonjour,
J'ai testé et ça fonctionne bien.
C'est moins commode que le MsgBox de cette ressource qui permet d'indiquer l'objet cible et qui corrige les marges extérieures du UserForm.

Positionnement sur I15:
VB:
 Retour = InputBoxPerso.Display(Message, Titre, "12", _
                                   PosLeft:=ActiveWindow.Panes(1).PointsToScreenPixelsX([I15].Left) * 0.6, _
                                   PosTop:=ActiveWindow.Panes(1).PointsToScreenPixelsY([I15].Top) * 0.6)

0.6 c'est le taux de conversion Pixel To Point que j'ai mis en dur mais qu'il faut aller chercher avec l'API.

En I15: un décalage apparent vers la droite qui correspond à la marge gauche du UserForm (zone très légèrement ombrée).
1745923628200.png
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour