Sdílet prostřednictvím


ControlCollection.AddRichTextBox-Methode (Range, String) (2007 System)

Aktualisiert: November 2007

Fügt dem Arbeitsblatt im angegebenen Bereich ein neues RichTextBox-Steuerelement hinzu.

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

Syntax

'Declaration
Public Function AddRichTextBox ( _
    range As Range, _
    name As String _
) As RichTextBox
'Usage
Dim instance As ControlCollection
Dim range As Range
Dim name As String
Dim returnValue As RichTextBox

returnValue = instance.AddRichTextBox(range, _
    name)
public RichTextBox AddRichTextBox(
    Range range,
    string name
)

Parameter

Rückgabewert

Typ: Microsoft.Office.Tools.Excel.Controls.RichTextBox

Das RichTextBox-Steuerelement, das der ControlCollection-Instanz hinzugefügt wurde.

Ausnahmen

Ausnahme Bedingung
ArgumentNullException

Das Argument für den Namen oder den Bereich ist nullNULL-Verweis (Nothing in Visual Basic), oder das Argument für den Namen hat die Länge 0 (null).

ControlNameAlreadyExistsException

Ein Steuerelement mit dem gleichen Namen ist bereits in der ControlCollection-Instanz vorhanden.

InvalidRangeException

Der angegebene Bereich ist nicht gültig. Bereiche, die mehrere Bereiche enthalten, können nicht verwendet werden. Der Bereich muss sich auf dem gleichen Arbeitsblatt wie die ControlCollection-Instanz befinden.

Hinweise

Mithilfe der AddRichTextBox-Methode können Sie RichTextBox-Objekte am Ende der ControlCollection hinzufügen. Um ein RichTextBox zu entfernen, das zuvor programmgesteuert hinzugefügt wurde, verwenden Sie die Remove()-Methode.

Die Größe des Steuerelements wird automatisch geändert, wenn sich die Größe des Bereichs ändert.

Beispiele

Im folgenden Codebeispiel wird den Zellen A1 bis B2 ein RichTextBox-Steuerelement hinzugefügt, dann wird dem Steuerelement Text zugewiesen, und der Text wird formatiert.

Private Sub ExcelRangeAddRichTextBox()

    Dim RichTextBox1 As Microsoft.Office.Tools. _
        Excel.Controls.RichTextBox = Me.Controls. _
        AddRichTextBox(Me.Range("A1", "B2"), _
        "RichTextBox1")

    RichTextBox1.Text = "Sample text"
    RichTextBox1.Select(0, 6)
    RichTextBox1.SelectionFont = New Font( _
        "Times New Roman", 10, FontStyle.Bold)

End Sub
private void ExcelRangeAddRichTextBox()
{

    Microsoft.Office.Tools.Excel.Controls.RichTextBox
         richTextBox1 = this.Controls.AddRichTextBox(
         this.Range["A1", "B2"], "richTextBox1");
    richTextBox1.Text = "Sample text";
    richTextBox1.Select(0, 6);
    richTextBox1.SelectionFont = new Font("Times New Roman",
        10, FontStyle.Bold);
}

Berechtigungen

Siehe auch

Referenz

ControlCollection-Klasse

ControlCollection-Member

AddRichTextBox-Überladung

Microsoft.Office.Tools.Excel-Namespace