Code impression VBA

M

Michel

Guest
Bonjour à toutes et à tous,
Tout d'abord je vous souhaite une bonne année, une bonne santé et beaucoup de bonheur pour tous le monde.
Mon petit problème est :
je voudrais pouvoir quand je clique sur mon bouton imprimer et ceci en 2 exemplaires, que le premier soit en couleur et le deuxième en noir et blanc.
Je ne sais pas si c'est possible mais on ne s'est jamais.

De plus je vous relance pour le code de connection et déconnection internet .

D'avance je vous remercie.

@ plus

Michel
 
J

jon

Guest
ces moens devraient t'aider
<http://xlbysteph.free.fr/aideinformatique/actionimpression.htm>
<http:/:perso.wanadoo.fr/frederic.sigonneau> pour le second problème

ces sujets ont déjà été abordés et résolus sur ce forum, le moteur de recherche ne fonctionnant pas, utilise le moteur de recherche de google
en tapant notamment site:www.excel-downloads.com comme termes pour ta recherche

bye
 
R

Roland

Guest
Bonjour Michel
C'est possible mais pas évidant
Soit récupérer la description des boites de dialogue Propriétés de l'imprimante et les fonctions de passage de paramètres ( pour moi mission imossible)

Soit envoyer les séquences de commandes directement à l'imprimante, mais pas sûr car elle peuvent être écrasées par la suite ( de toute façon mission trés difficile)

Soit si le document à imprimer n'est pas trés volumineux il y a des solutions bidouille, en voila une qu'il faudrait développer en macro :
copier la feuille couleur dans une nouvelle feuille, sélectioner toutes les cellules et attribuer les paramètres text, backcolor, fillcolor ... en noir et blanc et faire l'impression de cette feuille en plus de la feuille couleur.
A ta dispostion pour plus de détails si nécessaire ou si pas d'autres solutions plus preformantes de proposées par les spécialistes du forum.

A+ Roland
 
K

Karl

Guest
Michel,

J'ai peut être une solution à ton problème d'impression.

Meilleurs voeux
@+ Karl
 

Pièces jointes

  • Essai.zip
    9.7 KB · Affichages: 287
  • Essai.zip
    9.7 KB · Affichages: 304
  • Essai.zip
    9.7 KB · Affichages: 308
R

Roland

Guest
Bonjour à tous

C'est bien connu le ridicule ne tue pas mais quand même la prochaine fois je laisserai aux experts le temps de se pencher sur nos petits problèmes avant de sombrer dans mes élucubrations ....

Bravo et merci à Jon pour les liens forts instructifs.

Amicalement Roland
 
E

EMG

Guest
Bonjour à tous et toutes

je vous souhaite une bonne année

je ne sais pas si cela peut convenir le fichier ne gére pas la couleur ou noir et blanc mais bon

Gérard
 

Pièces jointes

  • IMPRIMER.zip
    19.9 KB · Affichages: 290
  • IMPRIMER.zip
    19.9 KB · Affichages: 308
  • IMPRIMER.zip
    19.9 KB · Affichages: 321
R

Roland

Guest
Re Bonjour à tous

Michel voici le code qui te permet de choisir couleur ou noir&blanc

With ActiveSheet.PageSetup
.BlackAndWhite = True
End With

Tu l'insert devant le code d'impression.
Tu dupliques le tout en changeant True en False pour la seconde impression (il n'est pas interdit de faire une boucle ...).

A+ Roland
 
M

Michel

Guest
Bonjour le forum,
Merci à tous pour les renseignements ça marche impec
Et encore une fois bonne année, bonne santé et vraiment je remercie tous ceux qui donne de leur temps pour aider des personnes comme moi à avancer dans EXCEL-VBA.
@ plus
Michel
 
S

Statman

Guest
Bonjour à tous sur le forum

J'ai été trés intéréssé par l'exemple de EMG et son fichier "imprimer", j'ai voulut l'adapter mais je me suis planté et plus rien ne marche.
Voilà ce que je voulais faire: ajouter un "compteur" pour pouvoir imprimer plusieur exemplaire des feuilles en même temps.
De plus est-ce qu'il est possible qye toute sles feuilles n'apparaissent pas, c'est à dire en masquer certaine qui non pas à être imprimer ?

Voilà, beaucoup de question pour ce début de matinée

@+
 

Statistiques des forums

Discussions
312 304
Messages
2 087 064
Membres
103 450
dernier inscrit
bernardmortensen