OVH Cloud OVH Cloud

2 Macros

15 réponses
Avatar
Zed Rafi
bonjour à nouveau,

2 questions :

- J'ai déjà programmé une première macro, qui modifie les options d'afficage
des modifications. Comment faire pour que cette macro s'éxécute automatique
au démarrage de word???

- Lorsque je lance la fonction "Imprimer...", le premier des deux menus
déroulant "Imprimer" en bas à gauche a la valeur "document avec marques".
Or, je voudrais que l'option par défaut soit de ce menu soit "Document", qui
permet d'imprimer le document sans les commentaires et les modifications
apparentes. Faut-il que je créé une macro?

je suis sous Office2003.

Merci beaucoup!!!

5 réponses

1 2
Avatar
JièL Goubert
Bonjoir(c) Anacoluthe

Le 18/08/2005 23:19 vous avez écrit ceci :
Anacoluthe
« Ma grand-mère est enfermée
Dans une boite de chicorée
Quand la boite s'ouvrira
Ma grand-mère sortira »
- Comptine


...pété un boulon ?

JièL des boules au nez ;-)

Avatar
Anacoluthe
Bonjour !

'JièL Goubert' nous a écrit ...
...pété un boulon ?


dixit le savant de Marseille :
- Ce type est marteau , l'a pété un boulon

:-D ))
A+
A~

Avatar
Zed Rafi
c'est quoi la synthaxe pour déprotéger/reprotéger en gardant le contenu?

désolé, je débute vraiment en prog de macros


"Anacoluthe" a écrit dans le message de
news:%
Bonjour !

'Zed Rafi' nous a écrit ...
"Erreur d'exécution '4605':
La méthode ou propriété ShowRevisions n'est pas disponible à cause de
ShowRevisions."


Pouvais pas savoir que le document est un formulaire /protégé/ !!!! :-)

Faut le déprotéger puis le reprotéger en gardant les données (NoReset)
Tout devrait bien marcher alors.

Anacoluthe
« Ma grand-mère est enfermée
Dans une boite de chicorée
Quand la boite s'ouvrira
Ma grand-mère sortira »
- Comptine



Avatar
Geo
Bonjour Zed Rafi


c'est quoi la synthaxe pour déprotéger/reprotéger en gardant le contenu?


Demande à ton ami l'enregistreur de macros.

--

A+

Avatar
Anacoluthe
Bonjour !

'Zed Rafi' nous a écrit ...
c'est quoi la synthaxe pour déprotéger/reprotéger en gardant le contenu?


Sauf nouvelle surprise ce code devrait convenir :

Sub FichierImprimer()
Dim R As Boolean
Dim P As Integer
P = ActiveDocument.ProtectionType
If P <> wdNoProtection Then ActiveDocument.Unprotect
R = ActiveDocument.ShowRevisions
ActiveDocument.ShowRevisions = False
Dialogs(wdDialogFilePrint).Show
ActiveDocument.ShowRevisions = R
ActiveDocument.Protect Type:=P, NoReset:=True
End Sub

désolé, je débute vraiment en prog de macros


Il n'y a pas à être désolé, nous avons tous débuté un jour :-)

Ceci dit je ne suis pas du tout d'accord :
Il y a une /montagne/ entre faire des macros pour soi-même,
pour se faciliter les tâches répétitives, pour apprendre
ou travailler plus vite
et faire des macros pour des UTILISATEURS !!!

Vous demandez une macro qui va surcharger FicherImprimer
pour que 'Document' soit sélectionné au lieu de
'Document avec marques' par défaut dans un formulaire
protégé contenant des commentaires.

Les utilisateurs sont-ils si débiles qu'ils ne puissent
voir ou comprendre si on leur dit où faire un simple clic ?
Et cette macro de surcharge, vous allez la placer où ?
Et si ça fait planter TOUTES les impressions, comment
ferez-vous pour la maintenir/corriger/adapter
avant que vos utilisateurs fous de rages
qu'un apprenti sorcier ait encore /bidouillé/ leur Word
ne vous lynchent proprement ???

VBA est un très /mauvais/ langage de programmation,
beaucoup trop 'cool' , beaucoup trop 'bricolage'
vous avez vu hier que ma première macro plante si le document
est protégé (pas possible d'accéder à l'affichage des révisions)

Si vous n'êtes pas encore assez sûr de vos macros
pour savoir tout de suite ce qu'il faut faire en cas de pépin,
je vous déconseille fortement de faire de la surcharge de
commandes Word pour des tiers.

Geo a posé la bonne question : Pourquoi donc cette macro ?
C'est indiscutablement lui qui a raison !

On avait déjà les macros superfétatoires
Évitons aussi les macros aléatoires !

Ce coup-ci l'ami JièL pourra dire que j'ai pété un boulon :-)

Anacoluthe
« Les sorciers, lorsqu'ils font de terrifiantes conneries,
on accuse toujours l'apprenti. »
- Jacques PRÉVERT

1 2