OVH Cloud OVH Cloud

imprimer une msgbox

3 réponses
Avatar
Zazou
bonjour,

A la fin de ma macro j'ai une msgbox qui apparait, et je
voudrais que si on clique sur "OK", cela imprime la
msgbox.

Quel serait le code pour cela ?

merci beaucoup

Zazou

3 réponses

Avatar
Philippe.R
Bonsoir Zazou,
Peux tu publier ici le code de la macro correspondante ?
Ce serait plus aisé ainsi de te proposer une adaptation.
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Zazou" a écrit dans le message de
news:1125701c44162$d3b5e450$
bonjour,

A la fin de ma macro j'ai une msgbox qui apparait, et je
voudrais que si on clique sur "OK", cela imprime la
msgbox.

Quel serait le code pour cela ?

merci beaucoup

Zazou


Avatar
garnote
Bonsoir,

Tu veux imprimer le contenu du MsgBox ou la boîte au complet ?
Si ce n'est que le contenu, une piste :

Sub Impression()
Application.DisplayAlerts = False
Message = "Je veux qu'on m'imprime."
rep = MsgBox(Message, vbOKCancel)
If rep = 1 Then
Sheets.Add
[a1] = Message
ActiveSheet.PrintOut
ActiveSheet.Delete
End If
End Sub

Serge



"Zazou" a écrit dans le message de
news: 1125701c44162$d3b5e450$
bonjour,

A la fin de ma macro j'ai une msgbox qui apparait, et je
voudrais que si on clique sur "OK", cela imprime la
msgbox.

Quel serait le code pour cela ?

merci beaucoup

Zazou


Avatar
sonkukai
Le lundi 24 Mai 2004 à 09:43 par Zazou :
bonjour,
A la fin de ma macro j'ai une msgbox qui apparait, et je
voudrais que si on clique sur "OK", cela imprime la
msgbox.
Quel serait le code pour cela ?
merci beaucoup
Zazou
Bonjour, ayant eu le même besoin, j'ai récupéré le code.
Cela fonctionne avec juste un petit problème. Il n'utilise pas largeur de la page A4 pour imprimer et effectue des retours charriot plus souvent que demander. J'ai cherché s'il existait une solution pour résoudre le problème mais n'ai rien trouvé pour le moment.
Voici ce que je souhaite avoir sur ma feuille :
Le moniteur M. X avait une ou plusieurs cour(s) aux dates suivantes :
le 1 janvier à 8h00
le 2 janvier à 10h00
etc...
voici ce qu'il m'imprime:
Le moniteur
M. X avait une
ou plusieurs
cour(s) aux
dates
suivantes :
le 1 janvier
à 8h00
le 2 janvier
à 10h00
Si quelqu'un avait une solution,
Par avance merci,
Sonkukai