02. august 2004 - 17:47Der er
4 kommentarer og 1 løsning
Indholdsfortegnelse - fodnoter
Hej
Jeg sidder med et problem i Word 2003 ang. en indholdsfortegnelse over fodnoter. Inde under indholdsfortegnelse har man mulighed for at vælge en typografi/style man gerne vil have lavet indholdsfortegnelse over men det virker ikke med Fodnotetekster, men gør med billedtekster og figurer?
Teknologi, AI og forretning er i centrum på Computerworlds Cloud og AI Festival i København d. 18. og 19. september. Se hele programmet for den store konference om strategisk brug af Cloud og AI på: www.cloud-festival.dk
Den laver TC felter ved hvert fodnotereference som så kan bruges til at lave en indholdsfortegnelse med.
Sub nm030804() Dim vrng As Range Dim i As Long Dim FootText As String
For i = ActiveDocument.Fields.Count To 1 Step -1 If ActiveDocument.Fields(i).Type = wdFieldTOCEntry Then ActiveDocument.Fields(i).Delete End If Next i For i = 1 To ActiveDocument.Footnotes.Count Set vrng = ActiveDocument.Footnotes(i).Range FootText = vrng.Text Set vrng = ActiveDocument.Footnotes(i).Reference vrng.Collapse wdCollapseEnd vrng.Fields.Add vrng, wdFieldEmpty, "TC " & Chr(34) & FootText & Chr(34), False Next i End Sub
Lav et TOC felt som lister TC felter, som dette { TOC \f }og kør makroen. NOTE. vær varsom hvis du iøvrigt bruger TC felter til at markere indgange i indholdsfortegnelser.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.