Share via


NamedRange.VerticalAlignment-Eigenschaft

Ruft die vertikale Ausrichtung des NamedRange-Steuerelements ab oder legt diese fest.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)

Syntax

'Declaration
Property VerticalAlignment As Object
    Get
    Set
Object VerticalAlignment { get; set; }

Eigenschaftswert

Typ: System.Object
Einer der XlVAlign-Werte.

Hinweise

Einige der oben aufgeführten XlVAlign-Werte sind möglicherweise nicht verfügbar, je nach der Sprachunterstützung (beispielsweise Englisch (USA) beispielsweise Englisch (USA)), die Sie ausgewählt oder installiert haben, stehen Ihnen möglicherweise einige dieser Konstanten nicht zur Verfügung.

Beispiele

Im folgenden Codebeispiel wird veranschaulicht, wie verschiedene Formatierungs- und Anzeigeeigenschaften eines NamedRange-Steuerelements mit dem Namen NamedRange1 festgelegt werden. Insbesondere wird in diesem Beispiel die VerticalAlignment-Eigenschaft auf xlVAlignCenter festgelegt, sodass der Inhalt des Bereichs innerhalb der Grenzen jeder Zelle vertikal zentriert wird.

Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.

' <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-Sicherheit

Siehe auch

Referenz

NamedRange Schnittstelle

Microsoft.Office.Tools.Excel-Namespace