How to: Resize NamedRange Controls
You can set the size of a NamedRange control when you add it to a Microsoft Office Excel document; however, you might want to resize it at a later time.
Applies to: The information in this topic applies to document-level projects and application-level projects for Excel 2007 and Excel 2010. For more information, see Features Available by Office Application and Project Type.
You can resize a named range at design time or at run time in document-level projects. You can also resize named ranges at run time in application-level add-ins.
This topic describes the following tasks:
Resizing NamedRange controls at design time
Resizing NamedRange controls at run time in a document-level project
Resizing NamedRange controls at run time in an application-level project
Resizing NamedRange Controls at Design Time
You can resize a named range by redefining its size in the Define Name dialog box.
To resize a named range by using the Define Name dialog box
Right-click a NamedRange control.
Click Manage Named Ranges on the shortcut menu.
The Define Name dialog box appears.
Select the named range you want to resize.
Clear the Refers to box.
Select the cells you want to use to define the size of the named range.
Click OK.
Resizing NamedRange Controls at Run Time in a Document-Level Project
You can resize a named range programmatically by using the RefersTo property.
Poznámka
In the Properties window, the RefersTo property is marked as read-only.
To resize a named range programmatically
Create a NamedRange control on cell A1 of Sheet1.
Dim NamedRange1 As Microsoft.Office.Tools.Excel.NamedRange = _ Me.Controls.AddNamedRange(Me.Range("A1"), "NamedRange1")Microsoft.Office.Tools.Excel.NamedRange NamedRange1 = this.Controls.AddNamedRange(this.Range["A1", missing], "NamedRange1");Resize the named range to include cell B1.
NamedRange1.RefersTo = "=Sheet1!$A$1:$B$1"NamedRange1.RefersTo = "=Sheet1!$A$1:$B$1";
Resizing NamedRange Controls at Run Time in an Application-Level Project
You can resize a NamedRange control on any open worksheet at run time. For more information about how to add a NamedRange control to a worksheet by using an application-level add-in, see How to: Add NamedRange Controls to Worksheets.
To resize a named range programmatically
Create a NamedRange control on cell A1 of Sheet1.
Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet = _ Application.ActiveSheet ' Use the following line of code in projects that target the .NET Framework 4. Dim worksheet As Microsoft.Office.Tools.Excel.Worksheet = _ Globals.Factory.GetVstoObject(NativeWorksheet) ' In projects that target the .NET Framework 3.5, use the following line of code. ' Dim worksheet = CType(Application.ActiveSheet, _ ' Excel.Worksheet).GetVstoObject() Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange namedRange1 = worksheet.Controls.AddNamedRange(worksheet.Range("A1"), "MyNamedRange")// Use the following line of code in projects that target the .NET Framework 4. Worksheet worksheet = Globals.Factory.GetVstoObject(Application.ActiveSheet); // In projects that target the .NET Framework 3.5, use the following line of code. // Worksheet worksheet = ((Excel.Worksheet)Application.ActiveSheet).GetVstoObject(); Microsoft.Office.Tools.Excel.NamedRange namedRange1 = worksheet.Controls.AddNamedRange( worksheet.Range["A1", missing], "MyNamedRange");Resize the named range to include cell B1.
namedRange1.RefersTo = "=Sheet1!$A$1:$B$1"namedRange1.RefersTo = "=Sheet1!$A$1:$B$1";
See Also
Tasks
How to: Add NamedRange Controls to Worksheets
How to: Resize Bookmark Controls
How to: Resize ListObject Controls
Concepts
Extending Word Documents and Excel Workbooks in Application-Level Add-ins at Run Time
Adding Controls to Office Documents at Run Time
Host Items and Host Controls Overview
Automating Excel by Using Extended Objects