Formular öffnen bei klick
27.12.2006 15:53:50
Thomas
mit folgender Bedingung öffnet sich im Tabellenblatt "Tabelle1" das Formular "frmSchreiben"
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column > 3 And Selection.Rows.Count < 2 Then
frmSchreiben.Show
End If
End Sub
Problem:
Zur Zeit genügt es, wenn der User mit den "Pfeil-Tasten" der Tastatur durch das Tabellenblatt geht und
auf eine entsprechende Zelle kommt, wo die Bedingung erfüllt ist, dass sich das Formular "frmSchreiben" öffnet.
Jetzt möchte ich das Öffnen dieses Formulares "frmSchreiben" nur noch ermöglichen, wenn der User einmal mit
der linken Maustaste auf die Zelle klickt und wenn dann meine obige Bedingung zutrifft, sich entsprechend
das Formular "frmSchreiben" öffnet.
Für Hilfe vielen Dank!
Gruß,
Thomas