Manipulere skrift, output ved bogmærke.

Du kan ikke have det i samme kodelinje, men du kan f.eks. gøre sådan:

    'Fed skrift:
    With ActiveDocument.Bookmarks("afd").Range
        .Font.Bold = True
        .Text = TextBox1.Value
    End With
   
    'Anden farve - udskift med den ønskede farve
    With ActiveDocument.Bookmarks("afd").Range
        .Font.Color = wdColorRed
        .Text = TextBox1.Value
    End With

Eks.:

ActiveDocument.Bookmarks("afd").Range.Text = TextBox1.Value
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Font.Bold = True

Ingen af delene virker lige umiddelbart

Du skriver "ingen af delene virker umiddelbart" men superteksts løsning er markeret som accepteret svar. Hvad betyder det?

Det er da ikke markeret som et accepteret svar når jeg kigger :)

Det må være en eksperten.dk fejl

Det var mig, der havde set forkert på farven - beklager...

Når min kode ikke virker, kan det skyldes, at dit bogmærke "afd" ikke i forvejen indeholder tekst. Jeg gik ud fra, at der stod noget -  f.eks. "afd" - i forvejen. Er det et tomt bogmærke?

I givet fald så prøv at bygge koden efter dette princip

    Dim oRange As Range

    'Brug oRange til at holde styr på dit bogmærke
    Set oRange = ActiveDocument.Bookmarks("afd").Range
   
    'Indsæt indhold og lav fed skrift på det indsatte
    With oRange
        .Text = TextBox1.Value
        .Font.Bold = True
    End With
   
    'Ryd op
    Set oRange = Nothing

Hvis det heller ikke virker, er du nødt til at vise noget mere af din kode.

Læg et svar lene-fredborg, så får du point

Kommer her...