Voetnote aanpassen

  • Onderwerp starter Onderwerp starter fcwiv
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

fcwiv

Gebruiker
Lid geworden
6 sep 2008
Berichten
43
Beste Lezer,

Hoe kan ik de Voetnote van een Word document aanpassen met VBA.?
Daarmee bedoel ik:
* de nummering
* de lijn die boven de voetnoot verschijnt een andere kleur geven
* lettertype

Maar in de tekst zelf wordt ook een nummer toegevoegd die verwijst naar de voetnoot.
Kan ik deze ook d.m.v. VBA aanpassen?

Groeten,

Fred
 
Voetnoot kleur

Beste,

Probleem is opgelost.

Groet,

Fred
 
Misschien handig om ook te vertellen wat je gedaan hebt; als anderen op dezelfde vraag googlen en dit topic tegenkomen, zullen ze niet zoveel aan je antwoord hebben ;) Kortom: vermeld nog even wat je gedaan hebt om het op te lossen...
 
Voetnoot kleur

Ik heb dit van internet gebruikt.

Code:
Dim s As Integer
For s = 1 To ActiveDocument.Footnotes.Count
ActiveDocument.Footnotes(s).Range.Select
With Selection
.Collapse Direction:=wdCollapseStart
.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend
.Font.Color = wdColorBlue
End With
Next

Simpel en heel erg handig.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan