[Résolu] Audits et impression

Discussions à propos du tableur Calc.
Les questions sur les macros doivent être postées dans la section dédiée en dessous.

Modérateur : Vilains modOOs

Règles du forum
Cette section est uniquement dédiée au tableur Calc. Vous ne devez pas poster ici de questions sur les macros mais utiliser la section éponyme.
Bruno Le Clainche
Membre OOrganisé
Membre OOrganisé
Messages : 69
Inscription : 13 mars 2006 12:40
Localisation : Bretagne

[Résolu] Audits et impression

Message par Bruno Le Clainche »

Re-bonjour
Savez s'il est possible de conserver des zones d'audit en permanence sans que les marqueurs d'audits n'apparaissent à l'impression ?

Merci.
Dernière modification par Bruno Le Clainche le 14 juin 2006 08:32, modifié 1 fois.
LibO 5.3.6.1 sous Windows sept (poste professionnel)
LibO 5.? sous Ubuntu 16.04 (poste personnel)

Il n'y a pas de problème qu'une absence de solution ne finisse par résoudre
Pierre-Yves Samyn
Grand Maître de l'OOffice
Grand Maître de l'OOffice
Messages : 11276
Inscription : 02 mai 2006 10:42

Masquer les repères d'audit à l'impression

Message par Pierre-Yves Samyn »

Bonjour

Ci-dessous 2 procédures pour masquer ou réafficher les repères. Principe : mettre les flèches en style de ligne "invisible".

Nota :

- Ces procédures "simplifiées" travaillent indistinctement sur tous les objets de dessin. A compléter donc si la feuille active en comprend qui ne soient pas des repères d'audit

- Possible d'affecter la macro "masquer" à l'événement "sur impression" du document par la commande Outils Personnaliser onglet Evénements

Code : Tout sélectionner

sub PysAuditMasquer
dim PysClasseur as Object, PysFeuilleActive as Object
dim i as integer
PysClasseur = thisComponent
PysFeuilleActive=PysClasseur.currentController.activeSheet
for i= 0 to PysFeuilleActive.DrawPage.count-1
	PysFeuilleActive.DrawPage(i).LineStyle=0
next i
end sub

sub PysAuditAfficher
dim PysClasseur as Object, PysFeuilleActive as Object
dim i as integer
PysClasseur = thisComponent
PysFeuilleActive=PysClasseur.currentController.activeSheet
for i= 0 to PysFeuilleActive.DrawPage.count-1
	PysFeuilleActive.DrawPage(i).LineStyle=1
next i
end sub

Bruno Le Clainche
Membre OOrganisé
Membre OOrganisé
Messages : 69
Inscription : 13 mars 2006 12:40
Localisation : Bretagne

Message par Bruno Le Clainche »

Re merci :P :P
LibO 5.3.6.1 sous Windows sept (poste professionnel)
LibO 5.? sous Ubuntu 16.04 (poste personnel)

Il n'y a pas de problème qu'une absence de solution ne finisse par résoudre
Pierre-Yves Samyn
Grand Maître de l'OOffice
Grand Maître de l'OOffice
Messages : 11276
Inscription : 02 mai 2006 10:42

Message par Pierre-Yves Samyn »

Re aussi :D
D'autres trouveront peut-être d'autres solutions mais si tu trouves ton problème résolu, je crois qu'il est demandé de l'indiquer dans le titre de ton premier post...
Répondre