Ich habe in einer Userform sehr viele Textboxen und sehr viele CommandButton erstellt. Bei Klick auf einen Command-Button soll die jeweilige Beschriftung des Command-Button in die Zwischenablage kopiert werden.
das mache ich wie folgt (für jeden CommandButton einzeln):
Ich finde das sehr umständlich! Kann man den Code irgendwie verkürzen - da es wirklich viele CommandButtons sind?
Desweitern möchte ich per Doppelklick oder rechtsklick mit der Maus den gerade aktuellen Wert der Zwischenablage in eine Textbox eingefügt haben. Bisher habe ich das für ca. 150 Text-Boxen so realisiert...
~begin~
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = ""
TextBox1.Paste
End Sub
Private Sub TextBox2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.Value = ""
TextBox2.Paste
End Sub
~end~
Auch diesen Weg finde ich sehr umständlich gibt es hier einen kürzeren Weg. Und wie müßte der Code aussehen wenn ich in Excel97 den Inhalt der Zwischenablage mit der re. Maustaste in die Textbox reinkopieren möchte.
Vielen Dank für eure Hilfe im Voraus...
Silvio