مشاركة عبر


NamedRange.HorizontalAlignment الخاصية

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

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

بناء الجملة

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

قيمة الخاصية

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

ملاحظات

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

أمثلة

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

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

' <Snippet38>
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>
// <Snippet38>
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 مساحة الاسم