OVH Cloud OVH Cloud

polices dans un document

14 réponses
Avatar
Greffier
Bonjour,

Je cherche à connaître les polices employées dans un document Word.
Comment dois-je m'y prendre.
Le document comprend environ 400 pages, avec paragraphes, notes, croquis,
image etc. .....
Existe-t-il une commande, ou une macro.

Merci à tous,
Amicalement,

Greffier.

10 réponses

1 2
Avatar
Geo
Bonjour Greffier


Bonjour,

Je cherche à connaître les polices employées dans un document Word.
Comment dois-je m'y prendre.
Le document comprend environ 400 pages, avec paragraphes, notes,
croquis, image etc. .....
Existe-t-il une commande, ou une macro.


Tu as déjà posé la question, on y a répondu, même que Circé a fait une
macro rien que pour ça.
C'est exceptionnel et tu as raté ça ?

--

A+

Avatar
Circé
Hello Geo,


Bonjour Greffier



Bonjour,

Je cherche à connaître les polices employées dans un document Word.
Comment dois-je m'y prendre.
Le document comprend environ 400 pages, avec paragraphes, notes,
croquis, image etc. .....
Existe-t-il une commande, ou une macro.



Tu as déjà posé la question, on y a répondu, même que Circé a fait une
macro rien que pour ça.
C'est exceptionnel et tu as raté ça ?


C'est tellement exceptionnel que je te laisse le soin de faire celle-ci
(d'autant que l'autre n'était pas de moi non plus !!!).
En effet, il s'agissait de tester toutes les polices disponibles. Cette
fois, il s'agit de lister toutes les polices utilisées dans un document !
Tu devrais être heureux d'avoir quelque chose à te mettre sous la dent
!!! :-)))

Circé




Avatar
Greffier
Bonjour,

J'ai du mal m'exprimer, Je cherche les polices utilisées dans un document.
Comment les trouver.

Y a-t-il un programme ou un menu spécial.

Greffier.





"Geo" a écrit dans le message de
news:%
Bonjour Greffier


Bonjour,

Je cherche à connaître les polices employées dans un document Word.
Comment dois-je m'y prendre.
Le document comprend environ 400 pages, avec paragraphes, notes,
croquis, image etc. .....
Existe-t-il une commande, ou une macro.


Tu as déjà posé la question, on y a répondu, même que Circé a fait une
macro rien que pour ça.
C'est exceptionnel et tu as raté ça ?

--

A+




Avatar
Geo
Bonjour Greffier


Bonjour,

J'ai du mal m'exprimer, Je cherche les polices utilisées dans un
document. Comment les trouver.

Y a-t-il un programme ou un menu spécial.



Excuse moi j'avais lu un peu trop vite comme l'a fait diplomatiquement
remarquer Circé.
A mon avis il faut une macro.
Bon je m'y colle.

A+ tard

Avatar
Geo
Bonjour Greffier


Bonjour,

J'ai du mal m'exprimer, Je cherche les polices utilisées dans un
document. Comment les trouver.


Voici une macro que Christophe Marchand a publié sur ce forum.
Suffit de sélectionner tout le document,
Il faut être patient mais on doit pouvoir l'optimiser un peu.

Sub PolicesUtilisées()
' Macro enregistrée le 15/01/2003 par C. Marchand
Dim tableau() As Variant
Dim i As Long
Dim j As Long
Dim flag As Integer
Dim tmp As String
ReDim tableau(0)
Dim Msg
For i = 1 To Len(Selection.Text)
tmp = Selection.Characters(i).Font.name
flag = 1
For j = 0 To UBound(tableau())
If tableau(j) = tmp Then
flag = 0
Exit For
End If
Next j
If flag Then
ReDim Preserve tableau(UBound(tableau()) + 1)
tableau(UBound(tableau())) = tmp
End If
Next i
For j = 1 To UBound(tableau())
MsgBox (tableau(j))
Next j
End Sub

Avatar
joel.surcouf
On Sat, 18 Sep 2004 14:30:07 +0200, "Greffier" wrote:

Je cherche les polices utilisées dans un document.
Comment les trouver.
Y a-t-il un programme ou un menu spécial.


Ca ne va pas aussi loin que la macro proposée par Geo,
mais on peut déjà se faire une première idée des styles
d'un document avec le menu Format > Styles.
Choisir "Afficher" les "Styles utilisés".

Joël.

Avatar
Greffier
Bonjour et merci,

Je remercie tout le monde, en particulier, Circé et Géo.
J'ai réussi à mettre en oeuvre le 2 macros proposées :
- la liste des polices utilisées dans Word
- la liste des polices utilisées dans un document de Word.

La première ok.
La seconde, plus laborieux, sur un paragraphe, elle semble marcher, sur le
document complet, on ne sait pas. Comment puis-je m'en assurer.

Merci.

Amicalement.

Greffier.



a écrit dans le message de
news:
On Sat, 18 Sep 2004 14:30:07 +0200, "Greffier" wrote:

Je cherche les polices utilisées dans un document.
Comment les trouver.
Y a-t-il un programme ou un menu spécial.


Ca ne va pas aussi loin que la macro proposée par Geo,
mais on peut déjà se faire une première idée des styles
d'un document avec le menu Format > Styles.
Choisir "Afficher" les "Styles utilisés".

Joël.



Avatar
Geo
Bonjour Greffier


Bonjour et merci,

Je remercie tout le monde, en particulier, Circé et Géo.
J'ai réussi à mettre en oeuvre le 2 macros proposées :
- la liste des polices utilisées dans Word
- la liste des polices utilisées dans un document de Word.

La première ok.
La seconde, plus laborieux, sur un paragraphe, elle semble marcher,
sur le document complet, on ne sait pas. Comment puis-je m'en assurer.


Ca fait plaisir d'avoir un retour.
A une époque, des universitaires prétendaient qu'on pouvait démontrer qu'un
programme faisait exactement ce qu'on attendait de lui.
Si quelqu'un veut s'y lancer ...
Dans ton cas on pourrait vérifier qu'il n'en fait pas de trop.
Tu supprimes (sauvegardes) les polices réputées inutilisées, tu re démarres
ton poste (par prudence) et tu ouvres ton document.
Dans Outils Options Compatibilité Substitutions des polices
tu verras s'il t'en manque.
Pour l'inverse il ne devrait pas rester trop de polices dans ta liste, tu
peux faire une recherche Édition rechercher avec chaque police.
Tiens tu peux même faire une petite amcro pour ça.
Peut-être même pour les substitutions ?

Par curiosité, c'est quoi "la liste des polices utilisées dans Word" ?

--

A+

Avatar
Greffier
Bonjour,

Je viens de prendre connaissance de la réponse de Géo :

- la liste des polices de Word est la liste qui s'affiche dans la boîte du
traitement de texte située entre celle du style et celle de la taille de la
police. Cette macro marche correctement et de permet de choisir l'une
d'elles.
- la liste des polices utilisées dans le document est une extraction de
cette liste. C'st cette macro qui soit prend du temps, soit boucle.

J'espère m'être correctement expliqué.

Amicalement.

Greffier.




"Geo" a écrit dans le message de
news:
Bonjour Greffier


Bonjour et merci,

Je remercie tout le monde, en particulier, Circé et Géo.
J'ai réussi à mettre en oeuvre le 2 macros proposées :
- la liste des polices utilisées dans Word
- la liste des polices utilisées dans un document de Word.

La première ok.
La seconde, plus laborieux, sur un paragraphe, elle semble marcher,
sur le document complet, on ne sait pas. Comment puis-je m'en assurer.


Ca fait plaisir d'avoir un retour.
A une époque, des universitaires prétendaient qu'on pouvait démontrer
qu'un

programme faisait exactement ce qu'on attendait de lui.
Si quelqu'un veut s'y lancer ...
Dans ton cas on pourrait vérifier qu'il n'en fait pas de trop.
Tu supprimes (sauvegardes) les polices réputées inutilisées, tu re
démarres

ton poste (par prudence) et tu ouvres ton document.
Dans Outils Options Compatibilité Substitutions des polices
tu verras s'il t'en manque.
Pour l'inverse il ne devrait pas rester trop de polices dans ta liste, tu
peux faire une recherche Édition rechercher avec chaque police.
Tiens tu peux même faire une petite amcro pour ça.
Peut-être même pour les substitutions ?

Par curiosité, c'est quoi "la liste des polices utilisées dans Word" ?

--

A+




Avatar
Geo
Bonjour Greffier


Bonjour,

Je viens de prendre connaissance de la réponse de Géo :

- la liste des polices de Word est la liste qui s'affiche dans la
boîte du traitement de texte située entre celle du style et celle de
la taille de la police. Cette macro marche correctement et de permet
de choisir l'une d'elles.


On peut voir la macro ?

- la liste des polices utilisées dans le document est une extraction
de cette liste. C'st cette macro qui soit prend du temps, soit boucle.


J'avais testé, c'est effectivement très ( mais alors très beaucoup) long,
mais je n'avais pas détecté de boucle, le compteur avançait correctement.
pour être complet je n'ai jamais eu la patience d'attendre qu'il aille au
bout d'un document de 10 pages, ça se compte en heures, mais sur un
paragraphe c'était bon.

--

A+

1 2