Abfrage
12.12.2007 08:40:24
serge
Bei folgender Abfrage möchte ich dass der Bereich sichtbar bleibt!
Sub abfrage()
Application.ScreenUpdating = False 'bringt nichts
wahl = MsgBox("Wollen Sie im aus gewähltem Bereich einen Termin festlegen", vbYesNo, "!")
If wahl = vbYes Then
Application.ScreenUpdating = True
Übersicht.Show
End If
End Sub
Aber sobald das Abfragefenster aufgeht ist der ausgewählte Bereich auf dem Bildschirm nicht mehr aktik!
Meine Frage:
1) wie kann ich das verhindern?
2)wie könnte ich den bereich ins Makro einbauen ( es könnne mehere zelle sein)
zB. wahl = MsgBox("Wollen Sie im aus gewähltem Bereich einen Termin & Adresse ?& festlegen", vbYesNo, "!")
sanke
Serge