Rechter Mausclick
08.01.2004 15:09:18
Ulf_MS
Ich fülle die Textform einer Userform mit der Textbox einer anderen per DblClick. Ist es möglich die zweite Textbox der Userform mit rechtem Click den anderen Wert aus Userform2 zuzuordnen??
Mfg
Ulf_MS
Anbei bisheriger Code
Private Sub txt1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim mon As String
If Me.cbomonat = "Januar" Then mon = ".01"
If Me.cbomonat = "Februar" Then mon = ".02"
If Me.cbomonat = "März" Then mon = ".03"
If Me.cbomonat = "April" Then mon = ".04"
If Me.cbomonat = "Mai" Then mon = ".05"
If Me.cbomonat = "Juni" Then mon = ".06"
If Me.cbomonat = "Juli" Then mon = ".07"
If Me.cbomonat = "August" Then mon = ".08"
If Me.cbomonat = "September" Then mon = ".09"
If Me.cbomonat = "Oktober" Then mon = ".10"
If Me.cbomonat = "November" Then mon = ".11"
If Me.cbomonat = "Dezember" Then mon = ".12"
usrUebung.txtvon = Me.txt1 & mon
End Sub
Anzeige