protection partielle d'un document

chris

XLDnaute Barbatruc

• 21 Février 2012

• #2

Re : protection partielle d'un document

Bonjour

Dans les options d'impression on peut choisir noir et blanc.

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 22 Février 2012

• #3

Re : protection partielle d'un document

Bonjour,

Merci pour ta suggestion, l'ennui c'est que dans mon document j'ai de nombreuses cellules comportant de la couleur, comment enlever le remplissage de ces cellules sans déprotéger le fichier?
Je souhaite garder ces couleurs car c'est plus agréable pour la lecture..... mais ruineux si on veut imprimer.

Sinon j'avais pensé mettre une macro avec un bouton située dans la barre de menus (? ) et paramétrer les options d'impression.

Melba

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 22 Février 2012

• #4

Re : protection partielle d'un document

Bonjour à tous,

Je pense que ce à quoi pense Chris est :

ActiveSheet.PageSetup.BlackAndWhite = True

Cliquez pour agrandir...

A repasser à False après l'impression

Bises à Chris
A+ à tous

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 22 Février 2012

• #5

Re : protection partielle d'un document

Bonjour,

S'agit-il d'un code à mettre dans une macro ou un code de contrôle activex?

Merci

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 22 Février 2012

• #6

Re : protection partielle d'un document

Bonjour à tous,

Il s'agit d'une ligne de code à insérer au bon endroit et dans la bonne macro...

A+ à tous

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 22 Février 2012

• #7

Re : protection partielle d'un document

Bonjour,

Je vais donc essayer de faire cette macro, succès non garanti

Melba

@+

 

Vote positif 0 Vote négatif

S

Sheldor

XLDnaute Occasionnel

Supporter XLD

• 22 Février 2012

• #8

Re : protection partielle d'un document

bonjour,
je ne sais pas si l'économie en volume d'encre est réelle pour le noir et blanc versus couleur, ça ne sollicite pas les même cartouches c'est sûr...
idée pour un fond mono chrome couleur non imprimable: mettre un pixel (un jpg) de la couleur souhaitée en arrière plan de la feuille
ça permet de jouer aussi en mettant des cellules blanches, ça ne pose pas de problème de protection
cordialement

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 22 Février 2012

• #9

Re : protection partielle d'un document

Bonjour,

En fait je voudrais que mon document imprimé ne comporte aucune couleur, pas même du gris que le contenu texte, chiffre et quadrillage en noir et blanc.
Est-possible?

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 22 Février 2012

• #10

Re : protection partielle d'un document

Bonjour à tous,

Utilise la ligne de code proposée en # 4...

A+ à tous

 

Vote positif 0 Vote négatif

S

Sheldor

XLDnaute Occasionnel

Supporter XLD

• 22 Février 2012

• #11

Re : protection partielle d'un document

perso je fournis des fichiers protégés en fond gris, l'utilisateur visualise où saisir les données: ce sont toujours les cellules blanches, ça permet de jouer sur deux teintes
à l'impression: tout est blanc
voir pj

 

Pièces jointes

• Classeur34.zip

  10 KB · Affichages: 44

Vote positif 0 Vote négatif

S

Sheldor

XLDnaute Occasionnel

Supporter XLD

• 22 Février 2012

• #12

Re : protection partielle d'un document

je n'avais pas compris, génial le #4 !

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 22 Février 2012

• #13

Re : protection partielle d'un document

Bonjour,

voilà le genre de macro que j'ai essayé de créer mais qui ne fonctionne pas :

Sub imprimer1()
'
' imprimer1 Macro
'

'
ActiveSheet.Unprotect
Range("B5:B8").Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1:B8").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Range("G18").Select
End Sub


L'ennui c'est qu'au lancement de la macro on me demande de rentrer le mot de passe.
J'ai essayé en vain d'introduire le code indiqué au 4 dans cette macro.

Merci pour votre aide

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 23 Février 2012

• #14

Re : protection partielle d'un document

Bonjour,

Pourriez-vous m'en dire plus sur le code en 4 : ActiveSheet.PageSetup.BlackAndWhite = True?
Ce code fonctionne-t-il même si le document est protégé et en lecture seule?

Merci à tous

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 23 Février 2012

• #15

Re : protection partielle d'un document

Bonjour à tous,

Il force les paramètres d'impression à utiliser le noir et blanc...
Il fonctionne sur un document protégé et en lecture seule.

A+ à tous

 

Vote positif 0 Vote négatif