Udostępnij za pośrednictwem


Metoda NamedRange.BorderAround —

Dodaje krawędź do NamedRange kontroli i zestawy Color, LineStyle, i Weight właściwości nowego obramowania.

Przestrzeń nazw:  Microsoft.Office.Tools.Excel
Zestaw:  Microsoft.Office.Tools.Excel (w Microsoft.Office.Tools.Excel.dll)

Składnia

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

Wartość zwracana

Typ: System.Object

Uwagi

Należy określić ColorIndex lub Color, ale nie obu.

Można określić LineStyle lub Weight, ale nie obu.Jeśli którykolwiek z argumentów nie jest określony, program Microsoft Office Excel używa domyślny styl linii i wagi.

Metoda ta opisuje cały zakres bez wypełnienia.Aby ustawić obramowanie wszystkich komórek, należy ustawić Color, LineStyle, i Weight właściwości Borders kolekcji.Aby usunąć obramowanie, należy ustawić LineStyle właściwość, aby xlLineStyleNone dla wszystkich komórek w zakresie.

Parametry opcjonalne

Informacje na temat parametrów opcjonalnych, zobacz Parametry opcjonalne w rozwiązaniach Office.

Przykłady

Poniższy przykład kodu demonstruje sposób ustawiania różnych formatowania i wyświetlania właściwości NamedRange formantu niezwiązanego o nazwie NamedRange1.W szczególności, w tym przykładzie użyto BorderAround metoda rysować Gruba krawędź wokół NamedRange1.

W tym przykładzie jest dla dostosowania poziomu 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();
    }
}

Zabezpieczenia programu .NET Framework

Zobacz też

Informacje

NamedRange Interfejs

Przestrzeń nazw Microsoft.Office.Tools.Excel