XmlMappedRange.MergeArea Свойство (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Получает объект Range, представляющий объединенный диапазон, который содержит элемент управления XmlMappedRange.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property MergeArea As Range
'Применение
Dim instance As XmlMappedRange
Dim value As Range

value = instance.MergeArea

[BrowsableAttribute(false)]
public Range MergeArea { get; }

Значение свойства

Тип: Microsoft.Office.Interop.Excel.Range
Объект Range, представляющий объединенный диапазон, который содержит элемент управления XmlMappedRange. Если элемент управления XmlMappedRange в объединенном диапазоне отсутствует, это свойство возвращает элемент управления XmlMappedRange.

Заметки

Свойство MergeArea можно использовать только с диапазоном, состоящим из одной ячейки.

Примеры

В следующем примере кода отображаются значения свойств MergeArea и MergeCells до и после объединения диапазона, который содержит XmlMappedRange. В этом примере кода предполагается, что текущий лист содержит объект XmlMappedRange с именем CustomerLastNameCell, находящийся в одной из ячеек от B2 до B5.

Private Sub SetMergeArea()
    Dim range1 As Excel.Range = Me.Range("B2", "B5")

    Dim beforeMergeAddress As String = _
        CustomerLastNameCell.MergeArea.Address( _
        ReferenceStyle:=Excel.XlReferenceStyle.xlA1)

    MsgBox("Before merging, the MergeArea property is '" & _
        beforeMergeAddress & "' and the MergeCells property is " & _
        " '" + CustomerLastNameCell.MergeCells.ToString() & "'.")

    range1.Select()
    range1.Merge(False)

    Dim afterMergeAddress As String = _
        CustomerLastNameCell.MergeArea.Address( _
        ReferenceStyle:=Excel.XlReferenceStyle.xlA1)

    MsgBox("After merging, the MergeArea property is '" & _
        afterMergeAddress & "' and the MergeCells property is " & _
        " '" + CustomerLastNameCell.MergeCells.ToString() & "'.")
End Sub

private void SetMergeArea()
{
    Excel.Range range1 = this.Range["B2", "B5"];

    string beforeMergeAddress = 
        CustomerLastNameCell.MergeArea.get_Address(
        missing, missing, Excel.XlReferenceStyle.xlA1, 
        missing, missing);

    MessageBox.Show("Before merging, the MergeArea property is '" +
        beforeMergeAddress + "' and the MergeCells property is " +
        " '" + CustomerLastNameCell.MergeCells.ToString() + "'.");

    range1.Select();
    range1.Merge(false);

    string afterMergeAddress =
        CustomerLastNameCell.MergeArea.get_Address(
        missing, missing, Excel.XlReferenceStyle.xlA1,
        missing, missing);

    MessageBox.Show("After merging, the MergeArea property is '" +
        afterMergeAddress + "' and the MergeCells property is " +
        " '" + CustomerLastNameCell.MergeCells.ToString() + "'.");
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

XmlMappedRange Класс

XmlMappedRange - члены

Microsoft.Office.Tools.Excel - пространство имен

Поделиться через