VBA to Open a Document to a Specific Heading

macropod · #4 01-29-2015, 08:58 PM

Since you know the number (which I assume is part of the heading text), you could use Find in VBA to find that number in the relevant Heading Style. For example:

Code:

Dim wdDoc As Document, StrFnd As String
'insert the code that references the document here
StrFnd = "string from database"
With wdDoc.Range
  With .Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Format = True
    .Forward = True
    .Wrap = wdFindContinue
    .MatchWholeWord = True
    .Text = StrFnd
    .Style = "Heading 1"
    .Replacement.Text = ""
    .Execute
  End With
  If .Find.Found = True Then
    'do something with the heading
  End If
End With

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to Restore Heading 1, Heading 2, etc. within a Word Document	cheech1981	Word	9	01-11-2017 02:14 AM
Formula to open external file with specific program (like open with)	pemartins	Excel	16	02-24-2014 11:39 PM
Deleting A blank Line that has a specific heading style , word 2010 & 2013	SteveWcg	Word	5	01-08-2014 10:37 PM
Macro to replace one specific heading style with another	ubns	Word VBA	44	09-04-2012 08:17 PM
Using Hyperlink to open Word Document at Specific Header	rossi45	Word	2	05-04-2012 06:03 PM