title: Multiline textbox set first line to bold font
body: <p>i have a userform with a multiline textbox for the Adress in the format</p>
  
  <p>Name1 Name2<br>
  Street Number<br>
  ZIP Place</p>
  
  <p>Now i want to get the first line with the name to be bold. I have created a textbox in my UserForm which fills the textmark but i cant get it working that just the first line is bold and the rest just normal i just get it working that the whole textbox is bold.</p>
  
  <pre><code>Private Sub CommandButton1_Click()
  Dim rngDoc As Range
  Dim oDoc As Document
  Dim cText As String
  Dim oRng As Range
  Dim oBM As Bookmark
  
  Set oDoc = ActiveDocument
  
  cText = TextBox5.Text
  
  With oDoc
  If .Bookmarks.Exists("Adresse") Then
  Set oRng = .Bookmarks("Adresse").Range
  oRng.Text = cText
  Set oBM = .Bookmarks.Add(Name:="Adresse", Range:=oRng)
  .Bookmarks("Adresse").Range.Paragraphs(1).Range.Font.Bold = True
  End If
  End With
  End Sub
  </code></pre>