08. marts 2004 - 13:50Der er
5 kommentarer og 1 løsning
Understregning også uden tekst
Den nederste linje i en overskrift skal være lige så lang som den til enhver tid længste linje i overskriften, også selvom det ikke nødvendigvis er den sidste. Eks: "Jeg har en overskrift som fylder flere linjer og den sidste linje skal være understreget" Stregen skal fylde helt hen til "r" i "fylder" (første linje) Hvordan klares dette? i WordPerfect vil man bare lave mellemrum, men den går ikke i Word Jeg kan forestille mig, at der måske skal laves en makro?
Sub Ustreg() ' ' Makro1 Makro ' Makro indspillet 08-03-04 af erikjuul ' Selection.ParagraphFormat.TabStops.ClearAll ActiveDocument.DefaultTabStop = CentimetersToPoints(2.3) Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(16), _ Alignment:=wdAlignTabRight, Leader:=wdTabLeaderSpaces If Selection.Font.Underline = wdUnderlineNone Then Selection.Font.Underline = wdUnderlineSingle Else Selection.Font.Underline = wdUnderlineNone End If Selection.TypeText Text:=vbTab End Sub
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.