Quote:
Originally Posted by Guessed
Your styles should already be set to 100% scaling
|
Well when we convert a PDF, which we don't know what was the source, it changes the scaling and spacing. That is the reason, I wanted to fix that in all instance in a word document.
Anyway, I found an interesting macro, to select in once intance, all the paragraph lists, and it seems to affect the Alpha-Numerical values as well. So you place the curser anywhere in the document, then click on macro, then click in the document again, you'll see it highlights all intance of lists. So change font size, change the font name.
The only thing, it won't Affect the bullets, so if I say, change all list to Arial and font 12, it seemed to do it everywhere, except all bullets. So if I have 25 new bullets styles, in a very big document, it won't touch it. You have to manually find them.
That isn't fun! Must be a magic way to fix all that?
Any way, here is the macro to find and selects all instance of paragr lists:
HTML Code:
On Error Resume Next
Application.ScreenUpdating = False
Dim Para As Word.Paragraph
With ActiveDocument
.DeleteAllEditableRanges (-1)
For Each Para In .Paragraphs
If Para.range.ListFormat.ListType > 0 Then
Para.range.Editors.Add (-1)
End If
Next
.SelectAllEditableRanges (-1)
.DeleteAllEditableRanges (-1)
End With
Application.ScreenUpdating = True
Please let me know if you find a way to Select all instance of the lists values (bullets and alphanumerical).
Cendrinne