NamedRange.BorderAround-Methode

Artikel
08/10/2011

Fügt einem NamedRange-Steuerelement einen Rahmen hinzu und legt die Eigenschaften Color, LineStyle sowie Weight für den neuen Rahmen fest.

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

Syntax

'Declaration
Function BorderAround ( _
    LineStyle As Object, _
    Weight As XlBorderWeight, _
    ColorIndex As XlColorIndex, _
    Color As Object _
) As Object

Object BorderAround(
    Object LineStyle,
    XlBorderWeight Weight,
    XlColorIndex ColorIndex,
    Object Color
)

Parameter

LineStyle
Typ: System.Object
Die Linienart für den Rahmen.Kann einer der folgenden XlLineStyle-Werte sein:
xlContinuous
xlDash
xlDashDot
xlDashDotDot
xlDot
xlDouble
xlSlantDashDot
xlLineStyleNone

Weight
Typ: Microsoft.Office.Interop.Excel.XlBorderWeight
Die Rahmenstärke.Kann eine der folgenden XlBorderWeight-Konstanten sein:
xlHairline
xlMedium
xlThick
xlThin

ColorIndex
Typ: Microsoft.Office.Interop.Excel.XlColorIndex
Die Rahmenfarbe als Index für die aktuelle Farbpalette oder als XlColorIndex-Konstante.Kann eine der folgenden XlColorIndex-Konstanten sein:
xlColorIndexAutomatic
xlColorIndexNone

Color
Typ: System.Object
Die Rahmenfarbe als ein RGB-Wert.

Rückgabewert

Typ: System.Object

Hinweise

Sie müssen entweder ColorIndex oder Color angeben. Sie können jedoch nicht beide angeben.

Sie können entweder LineStyle oder Weight angeben. Sie können jedoch nicht beide angeben. Wenn Sie kein Argument angeben, wird von Microsoft Office Excel die Standardlinienart und Standardlinienstärke verwendet.

Mit dieser Methode wird der gesamte Bereich umrahmt, er wird jedoch nicht ausgefüllt. Um die Ränder aller Zellen festzulegen, müssen Sie die Eigenschaften Color, LineStyle und Weight für die Borders-Auflistung festlegen. Um den Rahmen zu löschen, müssen Sie die LineStyle-Eigenschaft für alle Zellen innerhalb des Bereichs auf xlLineStyleNone festlegen.

Optionale Parameter

Informationen zu optionalen Parametern finden Sie unter Optionale Parameter in Office-Lösungen.

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 mithilfe der BorderAround-Methode ein breiter Rahmen um NamedRange1 herum gezeichnet.

Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.

    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

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();
    }
}

.NET Framework-Sicherheit

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.

Siehe auch

Referenz

NamedRange Schnittstelle

Microsoft.Office.Tools.Excel-Namespace

Share via