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.
- الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.