Gruppe
Dialog
Problem
Mit dem RefEdit-Steuerelement soll immer nur eine Zelle ausgewählt werden können.
ClassModule: frmOneOnly
Private Sub cmdCancel_Click()
Unload Me
End Sub
Private Sub RefEdit1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Range(RefEdit1.Value).Cells.Count > 1 Then
MsgBox "Bitte nur eine Zelle auswählen!"
RefEdit1.Value = ""
Cancel = True
End If
End Sub
StandardModule: Modul1
Sub CallForm()
frmOneOnly.Show
End Sub