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 nikoli oba současně.

Můžete určit buď LineStyle nebo Weight, ale nikoli oba současně.Pokud buď argument nezadáte, použije aplikace Microsoft Office Excel výchozí styl čáry a hmotnost.

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

Volitelné parametry

Informace o volitelných parametrů naleznete v tématu Volitelné parametry v Office Solutions.

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.

V tomto příkladu je úroveň dokument přizpůsobení.

    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ů