<div>
<div class="content wysiwyg-content">
Hi All<br />
<br />
I would like to find the heading numbers of the selected paragraph using VBA - thought this would be simple but I am flummoxed. <br />
<br />
Eg. &nbsp;I am using outline numbering or heading numbering and my text looks like this:<br />
<br />
1. &nbsp; Trees<br />
1.1 Gum <br />
1.2 Oak <br />
1.3 Terpentine<br />
<br />
My cursor is on Oak. &nbsp;I want VBA to return &quot;1.2&quot;
</div>
</div>


Hi All

I would like to find the heading numbers of the selected paragraph using VBA - thought this would be simple but I am flummoxed. 

Eg.  I am using outline numbering or heading numbering and my text looks like this:

1.   Trees
1.1 Gum 
1.2 Oak 
1.3 Terpentine

My cursor is on Oak.  I want VBA to return "1.2"

VBA to return Heading Number of numbered paragraph

Microsoft Word is a commercial document editing program that is part of the Microsoft Office suite. It features numerous text-editing tools for creating richly formatted documents, along with tools for the use of macros in Word documents. Word's native file formats are denoted either by a .doc or .docx file extension. Plugins permitting the Windows versions of Word to read and write formats it does not natively support, such as the OpenDocument format (ODF) are available. Word can import and display images in common bitmap formats such as JPG and GIF. It can also be used to create and display simple line-art.

Microsoft Word

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.

Visual Basic Classic

Microsoft applications include a variety of software programs, including development and digital authoring programs (Expression and Media Center), educational programs, Internet software, including Essentials, Skype and the Live family, anti-virus, productivity applications and suites like Office, Excel, Word, Outlook, Access and PowerPoint, video games and server applications such as Exchange, SharePoint, IIS and Virtual Server.