Ce navigateur n’est plus pris en charge.
Effectuez une mise à niveau vers Microsoft Edge pour tirer parti des dernières fonctionnalités, des mises à jour de sécurité et du support technique.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(128, 8%, 22%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EA%3C/text%3E%3C/svg%3E)
Bonjour,
Est-il possible de l'afficher plein écran ou de le redimensionner lorsque je clique sur l'icone que
j'ai incorporé à ma barre d'outils perso.
Cordialement Silve
.
Famille de feuilles de calcul Microsoft avec des outils pour l’analyse, le graphique et la communication des données.
Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(108.80000000000001, 78%, 20%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3ED%3C/text%3E%3C/svg%3E)
J'ai eu un message me disant que ça ne fonctionnait pas. Est-ce que tu peux positionner ta souris sur l'icône en question et la laisser immobile un instant pour noter ce qui s'affiche ?
Daniel
Je vais rechercher ou je dois saisir ta formule. Si je me souviens bien je dois aller dans
ThisWorkbook.
Non, il faut le mettre dans le module userform. Si tu le souhaites, je te poste un exemple.
Daniel
Désolé Daniel,
Je me suis planté comme un gros bonnet,
le bouton icône n'est pas le 12ème mais le 9ème.
Je réessaye et te tien au courant.
J'ai réessaye mais rien ne se passe, y a il une touche
particulière à actionner.
Bonjour Daniel,
Je te remercie pour ton code.
L'icone est le douzième depuis la gauche.
Il s'agit en réalité de l'icone que j'ai importé des
ma barre personnel. ici
v
Désolé mais je ne sais pas comment on fait pour entouré une partie de capture.
Je vais rechercher ou je dois saisir ta formule. Si je me souviens bien je dois aller dans
ThisWorkbook.
Encore merci.
Bonjour,
Je ne sais pas de quelle icône tu parles. Voici un code qui ouvre l'userform en plein écran :
Private Sub UserForm_Initialize()
With Application
.WindowState = xlMaximized
Width = .Width
Height = .Height
End With
End Sub
Cordialement.
Daniel