Sdílet prostřednictvím


NamedRange.BorderAround – metoda

Přidá ohraničení NamedRange ovládací prvek a nastaví Color, LineStyle, a Weight vlastnosti pro nový okraj.

Obor názvů:  Microsoft.Office.Tools.Excel
Sestavení:  Microsoft.Office.Tools.Excel (v Microsoft.Office.Tools.Excel.dll)

Syntaxe

'Deklarace
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
)

Parametry

Vrácená hodnota

Typ: System.Object

Poznámky

Je nutné zadat buď ColorIndex nebo Color, ale ne obojí.

Můžete zadat buď LineStyle nebo Weight, ale ne obojí.Pokud buď argument nezadáte, použije aplikace Microsoft Office Excel výchozí styl čáry a tloušťku.

Tato metoda popisuje celou oblast bez jeho vyplnění.Nastavte ohraničení všech buněk, je nutné nastavit Color, LineStyle, a Weight vlastnosti Borders kolekce.Chcete-li vymazat ohraničení, je třeba nastavit LineStyle vlastnost xlLineStyleNone pro všechny buňky v oblasti.

Volitelné parametry

Informace o nepovinných parametrů naleznete v tématu Volitelné parametry v řešeních pro systém Office.

Příklady

Následující příklad kódu ukazuje, jak nastavit různé formátování a zobrazení vlastností NamedRange ovládací prvek s názvem NamedRange1.Zejména v tomto příkladu BorderAround metoda kreslení Tlusté ohraničení okolo NamedRange1.

Tento příklad je pro vlastní úpravy úrovni dokumentu.

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

Zabezpečení rozhraní .NET Framework

Viz také

Referenční dokumentace

NamedRange Rozhraní

Microsoft.Office.Tools.Excel – obor názvů