Discussion :

[ouskel'n'or]

Bonjour,
J'ai un problème avec l'impression couleur
L'imprimante réseau est configuré par défaut en noir et blanc
En tant qu'administrateur, j'ai la possibilité de la configurer en couleur, ce que je fais.
Quand j'ouvre mes classeurs et que je fais un aperçu, celui-ci persiste à être en noir et blanc, ainsi que les éditions (!)
Pour éditer les 48 feuilles en couleur, je dois, pour chacune d'elles, configurer l'imprimante. A LA MAIN !

Je cherche, en VBA97, à faire ça par macro.

J'ai vu passer le sujet la semaine dernière ou la semaine précédente sur le forum (réponse par jmfmarques) mais elle concernait VB6. Donc, pas bon
Merci par avance

Comme maintenant je l'ai fait à la main, il n'y a plus d'urgence )

[jmfmarques]

Pourquoi, pas bon ?
Je crois que j'avais fait avec API...
Alors, celà devrait parcher avec VBA... il me semble...
Tu peux me ressortir ce lien ?
Sinin, je recommence, ma foi...

[zazaraignée]

Salut

Sais pas si ça t'aidera, surtout que mon imprimante est locale. Mais il faut passer par Mise en page.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 2006-05-31 par Isabelle Côté
'

'
    With ActiveSheet.PageSetup
        ... ' J'ai effacé un tas de lignes pour réduire
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
        .BlackAndWhite = False
        .Zoom = 100
        .PrintErrors = xlPrintErrorsDisplayed
    End With
End Sub

Et il se peut que ça soit spécifique à mon imprimante...

[zazaraignée]

Change de version, change d'imprimante ou d'administrateur réseau




Pardon

Il me fait marrer ce mec!

Ouskel', j'ai oublié de mentionner que j'ai fait le test avec Excel XP sous WinXP (itou). Le Upgrade m'a été fourni par un coéquipier pour un travail d'équipe au collège. J'avais besoin d'une version d'Access plus récente que 97.

Edit : Thierry, Fou rire ajouté

[jmfmarques]

Sinon, Ousk :
Si tu as le manuel de l'imprimante : fastoche : on lui envoie la séquence qui lui convient, juste avant l'impression... et voilà... (mais je n'aime pas trop cette solution car rien ne va plus en cas de changement d'imprimante...)

[ouskel'n'or]

Merci à tous. Surtout à toi, ThierryAim, qui t'es montré particulièrement constructif
J'essaierai ta solution demain, tante zaza , là je ne suis plus au boulot. J'ai effectivement la propriété BlackAndWhite mais je croyais que c'était une marque de chiens... Je verrai bien si ça fonctionne.
Non, jemefe, je n'ai pas installé l'imprimante et n'ai donc pas la doc. En outre, mes 22 collègues, ceux qui impriment en noir et blanc, ont tout de même l'option couleur. Je crois deviner leur réaction si je plantais "notre" imprimante couleur...
T'as envie que je sois mal vu ?
Si quelqu'un a une autre idée... sauf Thierry qui a montré ses limites.

[jmfmarques]

T'as envie que je sois mal vu ?

Oh que non !
Que les autres voient rouge ? (ptêt ben qu'oui)
Ceci étant dit : quand on modifie... on restitue l'état des lieux après... comme quand on pique-nique
Si l'excellente solution Zazaienne ne va pas, dis-le... je te ferai "la chose" avec une api

[ouskel'n'or]

Ok, merci jemefe. Au cours des quinze jours à venir, j'aurais à faire ça une douzaine de fois et donc... je te dis ça demain.

[ouskel'n'or]

Désolé, zaza, ça ne fonctionne pas dès lors qu'une collègue a enregistré ses modifications sur son poste.
Une petite explication : Après modifications apportées par les différents secteurs du service sur autant de classeurs, je rassemble ces fichiers sur un classeur unique. Ceci afin de présenter un document unique à éditer en couleur.
Je précise que j'ai essayé la copie de feuilles sur un fichier vierge ouvert sur mon poste et que ça n'a rien changé. Seule la copie du contenu de chaque feuille change la donne. Hélas, en raison des liaisons multiples et du nombre de graphes, la réalisation d'une macro serait vite une usine à gaz.
Voilà.
jmf, tu m'as fait une proposition... honnête... Je suis preneur. Merci d'avance.

[jmfmarques]

Je tente celà après le déjeuner... (prie pour que je n'abuse pas trop de la bonne bouteille que je vais ouvrir )