gelöst VBA Access - Minimieren durch doppelklick auf Fenster verhindern
Guten Morgen,
ich brauche ein Formular, welches nicht geschlossen, minimiert oder sonstiges werden kann..
Soweit so gut ich habe alles ausgestellt! Die Buttons des Fensters sind weg, sonstige Leisten sind komplett ausgeblendet, das Formular läuft im Vollbild, Kontextmenü ist auch aus.. Es hängt wirklich nur noch daran, dass man das Formular trotzdem per doppelklick auf die Fensterleiste minimieren kann.. Könnte mir jemand dazu den VBA Code geben damit ich dies verhindern kann?
lg Mike
lg Mike
4 Antworten
- LÖSUNG colinardo schreibt am 10.10.2011 um 10:55:23 Uhr
- LÖSUNG PalOneMike schreibt am 10.10.2011 um 11:28:09 Uhr
- LÖSUNG colinardo schreibt am 10.10.2011 um 11:43:24 Uhr
- LÖSUNG PalOneMike schreibt am 10.10.2011 um 12:45:17 Uhr
- LÖSUNG colinardo schreibt am 10.10.2011 um 11:43:24 Uhr
- LÖSUNG PalOneMike schreibt am 10.10.2011 um 11:28:09 Uhr
LÖSUNG 10.10.2011 um 10:55 Uhr
Du kannst dem Formular zusätzlich folgende Eigenschaften vergeben damit es den Fokus behält:
Gebunden = Ja
Rahmenart = Keine
Wenn du zusätzlich verhindern willst das das Fenster und somit die Datenbank geschlossen wird kannst du folgenden Code in das VBA Projekt des Formulars kopieren:
(Aber Vorsicht: Du verhinderst damit allgemein in Kombination mit den obigen Eigenschaften das die Datenbank überhaupt geschlossen werden kann; besser wäre hier eine Sicherheitsabfrage für den Benutzer z.B. via MsgBox)
Hoffe das hilft dir weiter...
Uwe
Gebunden = Ja
Rahmenart = Keine
Wenn du zusätzlich verhindern willst das das Fenster und somit die Datenbank geschlossen wird kannst du folgenden Code in das VBA Projekt des Formulars kopieren:
(Aber Vorsicht: Du verhinderst damit allgemein in Kombination mit den obigen Eigenschaften das die Datenbank überhaupt geschlossen werden kann; besser wäre hier eine Sicherheitsabfrage für den Benutzer z.B. via MsgBox)
01.
Private Sub Form_Unload(Cancel As Integer)
02.
Cancel = True
03.
End Sub
Uwe
LÖSUNG 10.10.2011 um 11:28 Uhr
Hallo, danke das klingt schon sehr gut und funktioniert auch soweit
mir gings nur darum, dass niemand etwas ändernm minimieren oder schließen kann.. Im unteren Eck ist ein Button zum Login für einen Admin, welcher dann das aktuelle Formular schließt nach anmeldung und ein Adminmenü öffnet. Mit der weiterleitung auf das Adminformular ist dann alles wieder erlaubt..
mit dem "Cancel = true" wird dann auch das schließen nach dem Login als Admin verhindert oder?
lg Mike
mir gings nur darum, dass niemand etwas ändernm minimieren oder schließen kann.. Im unteren Eck ist ein Button zum Login für einen Admin, welcher dann das aktuelle Formular schließt nach anmeldung und ein Adminmenü öffnet. Mit der weiterleitung auf das Adminformular ist dann alles wieder erlaubt..
mit dem "Cancel = true" wird dann auch das schließen nach dem Login als Admin verhindert oder?
lg Mike
LÖSUNG 10.10.2011 um 11:43 Uhr
mit dem "Cancel = true" wird dann auch das schließen nach dem Login als Admin verhindert oder?
ja das stimmt ! Aber du könntest im Code eine globale Variable hinterlegen die speichert wer gerade angemeldet ist und dann im obigen Code eine Abfrage dieser Variablen hinterlegen. z.B. so:
01.
Private Sub Form_Unload(Cancel As Integer)
02.
if loggedInUser = "Admin" then
03.
Cancel = False
04.
else
05.
Cancel = True
06.
End If
07.
End Sub
LÖSUNG 10.10.2011 um 12:45 Uhr
Einwandfrei Manchmal liegt die Lösung so nah und man kommt selbst nicht drauf )
Wunderbar.. vielen, vielen Dank :D
*thumbsUp*
Wunderbar.. vielen, vielen Dank :D
*thumbsUp*
Ähnliche Inhalte
Neue Wissensbeiträge
Heiß diskutierte Inhalte