Office: Erscheinen einer Fehlermeldung in Excel bei Steuerelement

Liebe Excel-Freaks!

Mein Problem ist Folgendes: Ich habe einen Excel-Bogen (2000), der unter anderem ein Steuerelement (Optionsfeld, 5 Optionen) beinhaltet. Ich möchte, dass der BEnutzer dieses Feld auf alle Fälle ausfüllt. Wenn nicht, soll ein Hinweis erscheinen, dass er es vergessen hat.

Ich hatte schon eine Syntax gefunden für VB zum eingeben (If Target.Address <> Range("A6").Address And _
Range("A6").Value = "" Then
MsgBox "Eintrag fehlt in A6!"
Range("A6").Select
End If
End Sub)

ALlerdings funktioniert das nciht bei mir. Ich kenne mich nun leider überhaupt nicht mit VB aus, von daher könnte das an diversen DEtails liegen (z.B. ist meine Zelle ein Gruppenfeld289 - kann man das dann auch so eingeben?).

Dann hatte ich die Funktion über Festlegen der Gültigkeit bei Excel versucht, aber das geht nun leider nicht für Steuerelemente.
Dieses Steuerelement hat nun einen Link auf eine andere Zelle, in der dann der Wert erscheint. Hier konnte ich zwar die Gültigkeit eingeben und Aufforderungsmeldung aktivieren, allerdings zählt für ihn dieser automatischer Eintrag (Dank Makro) nicht als ungültige Eingabe.

Hat jemand einen Rat für mich?

Schon einmal herzlichen DAnk für jeden Tipp!!

Grüsse
Silke

 

Hallo Silke,

kopiere das folgende Makro in Deine Datei im VB-Editor (ALT + F11) in "Diese Arbeitsmappe".

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Range("A6").Text = "" Then
Cancel = True 'Das Schliessen wird unterbrochen
MsgBox ("Sie haben etwas vergessen.")
End If
End Sub

Das Makro wird immer ausgeführt bevor die Datei geschlossen wird. Sollte die Zelle hier A6 leer sein, ist ein schliessen der Datei nicht möglich. :-)

Schönen Gruß
*Pablo*

 

Hallo Pablo,

auch das Makro hat super geklappt!!

Vielen Dank dafür...

Lieben Gruss
Sydney