NamedRange.MergeCells الخاصية
الحصول أو تعيين القيمة تشير إلى ما إذا كان NamedRangeعنصر تحكم يحتوي على خلايا مدمجة.
مساحة الاسم: Microsoft.Office.Tools.Excel
التجميع: Microsoft.Office.Tools.Excel (في Microsoft.Office.Tools.Excel.dll)
بناء الجملة
'إقرار
Property MergeCells As Object
Get
Set
Object MergeCells { get; set; }
قيمة الخاصية
النوع: System.Object
trueإذاNamedRangeعنصر تحكم يحتوي على خلايا مدمجة؛ وإلاfalse.
أمثلة
يلي تعليمات برمجية المثال يعرض القيمة MergeAreaو MergeCellsخصائص خلية واحدة NamedRangeقبل و بعد استخدام Mergeالأسلوب لدمج خلايا متعددة NamedRangeيحتوي على خلية واحدة في NamedRange.
Th هو المثال هو لتخصيص المستوى مستند.
Private Sub MergeRange()
Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
= Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
"namedRange1")
Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
= Me.Controls.AddNamedRange(Me.Range("A1"), "namedRange2")
Dim beforeMergeAddress As String = _
namedRange2.MergeArea.Address(, , _
Excel.XlReferenceStyle.xlA1, , )
MessageBox.Show("Before merging, the MergeArea property is '" & _
beforeMergeAddress & "' and the MergeCells property is " & _
" '" & namedRange2.MergeCells.ToString() & "'.")
namedRange1.Select()
namedRange1.Merge(False)
Dim afterMergeAddress As String = _
namedRange2.MergeArea.Address(, , _
Excel.XlReferenceStyle.xlA1, , )
MessageBox.Show("After merging, the MergeArea property is '" & _
afterMergeAddress & "' and the MergeCells property is " & _
" '" & namedRange2.MergeCells.ToString() & "'.")
End Sub
private void MergeRange()
{
Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
this.Controls.AddNamedRange(this.Range["A1", "A5"],
"namedRange1");
Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
this.Controls.AddNamedRange(this.Range["A1", missing],
"namedRange2");
string beforeMergeAddress = namedRange2.MergeArea.get_Address(
missing, missing, Excel.XlReferenceStyle.xlA1, missing, missing);
MessageBox.Show("Before merging, the MergeArea property is '" +
beforeMergeAddress + "' and the MergeCells property is " +
" '" + namedRange2.MergeCells.ToString() + "'.");
namedRange1.Select();
namedRange1.Merge(false);
string afterMergeAddress = namedRange2.MergeArea.get_Address(
missing, missing, Excel.XlReferenceStyle.xlA1, missing, missing);
MessageBox.Show("After merging, the MergeArea property is '" +
afterMergeAddress + "' and the MergeCells property is " +
" '" + namedRange2.MergeCells.ToString() + "'.");
}
أمن NET Framework.
- الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.