مشاركة عبر


NamedRange.VerticalAlignment الخاصية

الحصول أو تعيين محاذاة عمودية ل NamedRangeعنصر تحكم.

مساحة الاسم:  Microsoft.Office.Tools.Excel
التجميع:  Microsoft.Office.Tools.Excel (في Microsoft.Office.Tools.Excel.dll)

بناء الجملة

'إقرار
Property VerticalAlignment As Object
    Get
    Set
Object VerticalAlignment { get; set; }

قيمة الخاصية

النوع: System.Object
واحد XlVAlignقيم.

ملاحظات

بعض XlVAlignقد لا تتوفر قيم إلى لك، اعتماداً تشغيل دعم لغة (الولايات المتحدة الأمريكية اللغة الإنجليزية ل مثال) التي قمت بتحديدها أو مثبت.

أمثلة

يوضح المثال تعليمات برمجية التالي كيفية تعيين التعيين متنوعة من التنسيقات وعرض خصائص NamedRangeعنصر تحكم المسمى NamedRange1. وعلى وجه الخصوص، وهذا مثال تعيين VerticalAlignmentخاصية إلى xlVAlignCenterحيث يتم توسيط محتويات النطاق رأسياً داخل حدود كل خلية.

Th هو المثال هو لتخصيص المستوى مستند.

' <Snippet37>
Private Sub SetRangeFormats()
    Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
        "namedRange1")

    namedRange1.NoteText("This is a Formatting test", , )
    namedRange1.Value2 = "Martha"
    namedRange1.Font.Name = "Verdana"
    namedRange1.VerticalAlignment = Excel.XlVAlign.xlVAlignCenter
    namedRange1.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter
    namedRange1.BorderAround(, Excel.XlBorderWeight.xlThick, _
        Excel.XlColorIndex.xlColorIndexAutomatic, )
    namedRange1.AutoFormat( _
        Excel.XlRangeAutoFormat.xlRangeAutoFormat3DEffects1, _
        True, False, True, False, True, True)

    If MessageBox.Show("Clear the formatting and notes?", _
        "Test", MessageBoxButtons.YesNo) = DialogResult.Yes Then
        namedRange1.ClearFormats()
        namedRange1.ClearNotes()
    End If
End Sub

' </Snippet35>
// <Snippet37>
private void SetRangeFormats()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "A5"],
        "namedRange1");

    namedRange1.NoteText("This is a Formatting test", missing, missing);
    namedRange1.Value2 = "Martha";
    namedRange1.Font.Name = "Verdana";
    namedRange1.VerticalAlignment = Excel.XlVAlign.xlVAlignCenter;
    namedRange1.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;
    namedRange1.BorderAround(missing, Excel.XlBorderWeight.xlThick,
        Excel.XlColorIndex.xlColorIndexAutomatic, missing);
    namedRange1.AutoFormat(Excel.XlRangeAutoFormat.xlRangeAutoFormat3DEffects1,
        true, false, true, false, true, true);

    if (MessageBox.Show("Clear the formatting and notes?", "Test",
        MessageBoxButtons.YesNo) == DialogResult.Yes)
    {
        namedRange1.ClearFormats();
        namedRange1.ClearNotes();
    }
}
// </Snippet35>

أمن NET Framework.

راجع أيضًَا

المرجع

NamedRange واجهة

NamedRange الأعضاء

Microsoft.Office.Tools.Excel مساحة الاسم