Multiline in textbox(Word)

Status
Niet open voor verdere reacties.
S

Strij51

Gebruiker
Lid geworden
22 dec 2014
Berichten
45
Hallo,

Ik heb met VBA een textbox met daarin 3 regels in een document geplaatst.
Nu wil ik dat de bovenste regel een andere lettergrootte en kleur krijgt toegewezen dan de onderste
maar vraag me af of dat op deze manier lukt (zie bijgevoegde code) Wie kan mij hiermee helpen
 

Bijlagen

  • textbox.doc
    23 KB · Weergaven: 20
Code: 
Sub M_snb()
    With ActiveDocument.Shapes.AddTextbox(1, 35, 43, 515, 155)
        With .Line
            .Weight = 16
            .ForeColor = RGB(0, 67, 128)
            .Visible = -1
        End With
       With .TextFrame.TextRange
           With .Font
              .Size = 10
              .Name = "Rockwell"
           End With
          .Bold = True
          .ParagraphFormat.Alignment = 2
          .Text = "Aaaaaaa" & Chr(10) & "Bbbbbbbb" & Chr(10) & "Cccccccccc"
          
           With .Paragraphs(1).Range.Font
                .Size = 34
                .ColorIndex = 13
            End With
        End With
    End With
End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan