Freigeben über


Beispiele für Cut-, Paste-Methoden, TextBox-Steuerelement

Im folgenden Beispiel werden die Methoden Cut und Paste zum Ausschneiden von Text aus einem TextBox-Objekt und zum Einfügen in ein anderes TextBox-Objekt verwendet.

Kopieren Sie diesen Beispielcode in den Deklarationsbereich eines Formulars. Stellen Sie sicher, dass das Formular folgende Komponenten enthält:

  • Two TextBox controls named TextBox1 and TextBox2.
  • Eine Befehlsschaltfläche ( CommandButton ) mit der Bezeichnung "CommandButton1".
Private Sub UserForm_Initialize() 
 TextBox1.Text = "From TextBox1!" 
 TextBox2.Text = "Hello " 
 
 CommandButton1.Caption = "Cut and Paste" 
 CommandButton1.AutoSize = True 
End Sub 
 
Private Sub CommandButton1_Click() 
 TextBox2.SelStart = 0 
 TextBox2.SelLength = TextBox2.TextLength 
 TextBox2.Cut 
 
 TextBox1.SetFocus 
 TextBox1.SelStart = 0 
 
 TextBox1.Paste 
 TextBox2.SelStart = 0 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.