Microsoft KB Archive/302281

= How to obtain the window handle for an Office Automation server by using Visual Basic .NET =

Article ID: 302281

Article Last Modified on 3/29/2007

-

APPLIES TO


 * Microsoft Visual Basic .NET 2003 Standard Edition
 * Microsoft Visual Basic .NET 2002 Standard Edition
 * Microsoft Office Access 2003
 * Microsoft Access 2002 Standard Edition
 * Microsoft Office Excel 2003
 * Microsoft Excel 2002 Standard Edition
 * Microsoft Office PowerPoint 2003
 * Microsoft PowerPoint 2002 Standard Edition
 * Microsoft Office Word 2003
 * Microsoft Word 2002 Standard Edition

-



This article was previously published under Q302281



SUMMARY
This article demonstrates how to obtain the window handle of a Microsoft Office application while automating that application from Microsoft Visual Basic .NET.



MORE INFORMATION
The object models for most Office applications do not expose properties for retrieving the application window handles. To determine the window handle of an Office application that you are automating, you can use the FindWindow function with the class name of the topmost window for the application. If the application can have multiple instances running at the same time, you may need to account for this so that you retrieve the correct window handle. The following sections illustrate techniques for retrieving the window handle for both single and multiple instance applications.

Note The Microsoft Access object model exposes the hWndAccessApp property for the Application object for determining the window handle of the application. You can also use the hWnd property for Forms and Reports to retrieve handles to those specific windows. Additionally, Microsoft Excel 2002 is the first version of Excel to introduce an hWnd property for its Application object. Regarding Excel 2002 and later and Microsoft Access 97 and later, the FindWindow approach that is discussed in this article is not necessary because these Office applications can retrieve the window handle for the application through their respective object models.

Find the window handle for an application that is a single instance
The following steps illustrate how you can use the FindWindow function with a Visual Basic Automation client to determine the window handle for an out-of-process Automation server that can have only a single instance. This is the technique that you employ when you use Microsoft PowerPoint as your Automation server.

Step-by-step example
 Start Microsoft Visual Studio .NET. On the File menu, click New, and then click Project. Select Windows Application from the list of Visual Basic Projects types. Form1 is created by default. Add a reference to the Microsoft PowerPoint Object Library. To do this, follow these steps:  On the Project menu, click Add Reference. On the COM tab, locate the Microsoft PowerPoint Object Library, and then click Select.

Note Microsoft Office 2003 includes Primary Interop Assemblies (PIAs). Microsoft Office XP does not include PIAs, but they may be downloaded. For more information about Office XP PIAs, click the following article number to view the article in the Microsoft Knowledge Base:

328912 Microsoft Office XP primary interop assemblies (PIAs) are available for download

 Click OK in the Add References dialog box to accept your selections. If you are prompted to generate wrappers for the libraries that you selected, click Yes.</ol> </li> On the View menu, select Toolbox to display the Toolbox, and then add a button to the form.</li> Press F7 to view the code window for Form1.</li>  Paste the following code at the beginning of the code window: Imports System.Runtime.InteropServices Imports Microsoft.Office.Interop

Public Class MyApi <DllImport(&quot;user32.dll&quot;)> Public Shared Function _ FindWindow(ByVal strClassName As String, ByVal strWindowName _            As String) As Integer End Function End Class </li>  Add the following code to the Click event of Button1: Dim pptApp As PowerPoint.Application Dim hwndPPt As Integer

pptApp = New PowerPoint.Application pptApp.Visible = True

hwndPPt = MyApi.FindWindow(&quot;PP10FrameClass&quot;, Nothing)

MsgBox(&quot;hwndPPt (&quot; & Hex(hwndPPt) & &quot;) has the Window handle to &quot; & _     &quot;Powerpoint's Main Window.&quot; & vbCr &  &quot; Click OK to close PowerPoint.&quot;)

pptApp.Quit

NotePP10FrameClass is the class name for the Microsoft PowerPoint 2002 application window. If you automate PowerPoint 2003, change the class name in the code to PP11FrameClass. </li> Press F5 and click Button1 to run the sample.</li></ol>

Find the window handle for an application that can have multiple instances
Some applications, such as Microsoft Excel or Microsoft Word, can have multiple instances running at the same time. To retrieve the handle to the application instance that you are automating, you can first use Automation to change the title of the application to a unique value and then use the FindWindow function to retrieve its window handle. The following steps illustrate this technique by using Excel as the Automation server.

Step-by-step example
<ol> Start Visual Studio .NET.</li> On the File menu, click New, and then click Project. Select Windows Application from the Visual Basic Projects types. Form1 is created by default.</li> Add a reference to the Microsoft Excel Object Library. To do this, follow these steps: <ol style="list-style-type: lower-alpha;"> On the Project menu, click Add Reference.</li> On the COM tab, locate the Microsoft Excel Object Library, and then click Select.

Note Microsoft Office 2003 includes Primary Interop Assemblies (PIAs). Microsoft Office 2002 does not include PIAs, but they may be downloaded. For more information about Office XP PIAs, click the following article number to view the article in the Microsoft Knowledge Base:

328912 Microsoft Office XP primary interop assemblies (PIAs) are available for download

</li> Click OK in the Add References dialog box to accept your selections. If you are prompted to generate wrappers for the libraries that you selected, click Yes.</li></ol> </li> On the View menu, select Toolbox to display the Toolbox, and then add a button to the form.</li> Press F7 to view the code window for Form1.</li>  Paste the following code at the beginning of the code window: Imports System.Runtime.InteropServices Imports Microsoft.Office.Interop

Public Class MyApi <DllImport(&quot;user32.dll&quot;)> Public Shared Function _ FindWindow(ByVal strClassName As String, ByVal strWindowName _            As String) As Integer End Function End Class </li>  Add the following code to the Click event of Button1: Dim xlapp As Excel.Application Dim hwndExcel As Integer

xlapp = New Excel.Application xlapp.Visible = True xlapp.Caption = &quot;Some Window Caption&quot;

hwndExcel = MyApi.FindWindow(&quot;XLMAIN&quot;, xlapp.Caption)

xlapp.Caption = Nothing

MsgBox(&quot;hwndExcel (&quot; & Hex(hwndExcel) & &quot;) has the Window handle to &quot; & _      &quot;Excel's Main Window.&quot; & vbCr &  &quot; Click OK to close Excel.&quot; )

xlapp.Quit </li> Press F5 and click Button1 to run the sample.</li></ol>

<div class="references_section">