I'm trying to grab a cell in excel named "SiteNumber" that has a sentence in it and paste it into word at the bookmark "site_number".
That is working.
The issue is that there is one word in the sentence that is bolded and underlined. Is there a way to keep the formatting?
Code is below. Thanks!
Sub exporttoword()
Application.ScreenUpdating = False
Dim wordapp As New Word.Application
Dim doc As Word.document
Dim site_number As Word.Range
Dim docpath As String
wordapp.Visible = True
Set doc = wordapp.Documents.Open([wordPath].Text, , True)
Sheets("Cover_Page").Activate
Set site_number = doc.Bookmarks("site_number").Range
site_number.Text = Range("SiteNumber").Value
Application.ScreenUpdating = False
Set site_number = Nothing
Set doc = Nothing
Application.ScreenUpdating = True
End Sub