ControlCollection.AddLinkLabel Метод (Range, String) (2007 System)
Обновлен: Ноябрь 2007
Добавляет в указанный диапазон листа новый элемент управления LinkLabel.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Function AddLinkLabel ( _
range As Range, _
name As String _
) As LinkLabel
'Применение
Dim instance As ControlCollection
Dim range As Range
Dim name As String
Dim returnValue As LinkLabel
returnValue = instance.AddLinkLabel(range, _
name)
public LinkLabel AddLinkLabel(
Range range,
string name
)
Параметры
- range
Тип: Microsoft.Office.Interop.Excel.Range
Объект Range, предоставляющий границы элемента управления.
- name
Тип: System.String
Имя элемента управления, которое можно использовать для индексации элемента управления в экземпляре ControlCollection.
Возвращаемое значение
Тип: Microsoft.Office.Tools.Excel.Controls.LinkLabel
Элемент управления LinkLabel, добавленный в экземпляр ControlCollection.
Исключения
| Исключение | Условие |
|---|---|
| ArgumentNullException | Аргумент имени или диапазона равен nullссылка null (Nothing в Visual Basic), или аргумент имени имеет нулевую длину. |
| ControlNameAlreadyExistsException | Элемент управления с таким именем уже имеется в данном экземпляре ControlCollection. |
| InvalidRangeException | Указанный диапазон не существует. Невозможно использовать диапазоны с несколькими областями. Диапазон должен находиться на том же листе, что и экземпляр ControlCollection. |
Заметки
Метод AddLinkLabel используется для добавления объектов LinkLabel в конец ControlCollection. Чтобы удалить добавленный программно объект LinkLabel, воспользуйтесь методом Remove().
Размер элемента управления автоматически изменяется при изменении размера диапазона.
Примеры
В следующем примере кода добавляется элемент управления LinkLabel в ячейку A1, и затем изменяется текст в Первое имя. После этого в коде цвет ссылки меняется на синий, а свойству LinkBehavior присваивается значение HoverUnderline.
Private Sub ExcelAddLinkLabel()
Dim LinkLabel1 As Microsoft.Office.Tools.Excel. _
Controls.LinkLabel = Me.Controls.AddLinkLabel( _
0, 0, 75, 17.25, "LinkLabel1")
LinkLabel1.Text = "First Name"
LinkLabel1.LinkColor = Color.Blue
LinkLabel1.LinkBehavior = LinkBehavior.HoverUnderline
End Sub
private void ExcelAddLinkLabel()
{
Microsoft.Office.Tools.Excel.Controls.LinkLabel
linkLabel1 = this.Controls.AddLinkLabel(
0, 0, 75, 17.25, "linkLabel1");
linkLabel1.Text = "First Name";
linkLabel1.LinkColor = Color.Blue;
linkLabel1.LinkBehavior = LinkBehavior.HoverUnderline;
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.