XmlMappedRange.MergeCells Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft einen Wert ab, der angibt, ob das XmlMappedRange-Steuerelement zusammengeführte Zellen enthält, oder legt diesen Wert fest.
public object MergeCells { get; set; }
Eigenschaftswert
true, wenn das XmlMappedRange-Steuerelement zusammengeführte Zellen enthält; andernfalls false.
Beispiele
Das folgende Codebeispiel zeigt den Wert der MergeArea -Eigenschaft und der-Eigenschaft vor und nach dem Zusammenführen MergeCells eines Bereichs, der einen enthält XmlMappedRange . In diesem Codebeispiel wird davon ausgegangen, dass das aktuelle Arbeitsblatt einen mit dem XmlMappedRange Namen enthält CustomerLastNameCell , der sich in einer der Zellen aus Zelle B2 bis B5 befindet.
private void SetMergeArea()
{
Excel.Range range1 = this.Range["B2", "B5"];
string beforeMergeAddress =
CustomerLastNameCell.MergeArea.get_Address(
Excel.XlReferenceStyle.xlA1);
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(
Excel.XlReferenceStyle.xlA1);
MessageBox.Show("After merging, the MergeArea property is '" +
afterMergeAddress + "' and the MergeCells property is " +
" '" + CustomerLastNameCell.MergeCells.ToString() + "'.");
}
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