Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Selbstschliessende MsgBox {Nachgefragt}
zurück: Login mit Zwischenspeicher weiter: Msgbox automatisch quittieren?? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Diskussion Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Gast



Verfasst am:
02. Jan 2007, 09:48
Rufname:

Selbstschliessende MsgBox {Nachgefragt} - Selbstschliessende MsgBox {Nachgefragt}

Nach oben
       

Nachfragen zum Thema Selbstschliessende MsgBox (Willi Wipp)

Gast am 29. Dez 2006 um 15:50 hat folgendes geschrieben:
Hallo Nepumuk,

erst einmal danke für die schnelle Antwort. Razz
Da ich nicht mehr auf der Arbeit bin, kann ich es erst am Dienstag testen.
Werde mich aber dann melden.
Wünsche allen einen Guten Rutsch und ein Frohes neues Jahr.

gerdstone

Hallo Nepumuk,
erstmal Dir und allen anderen ein frohes neues Jahr. Smile
Die Fehlemeldung ist weg. Also meinen Dank.
Wenn ich jedoch die Funktion wie folgt aufrufe:
Code:
    MessageBox 0, "Test automatisches schließen", strBoxTitle, 64
schließt sich die Box nicht selbstständig. Embarassed

Gruß gerdstone
Nepumuk
VB / VBA Programmierer


Verfasst am:
02. Jan 2007, 09:52
Rufname: Max
Wohnort: Dusseldoof


AW: Selbstschliessende MsgBox - AW: Selbstschliessende MsgBox

Nach oben
       

Hallo gerdstone,

was hast du genau geändert?

_________________
De fontibus non est disputandum

Gruß
Nepumuk Cool
steffen0815
VBA-Programmierer


Verfasst am:
02. Jan 2007, 12:32
Rufname:

AW: Selbstschliessende MsgBox - AW: Selbstschliessende MsgBox

Nach oben
       

@Nepumuk,
dein Code funktioniert unter AC97 Wink

@gerdstone,
ich denke mal du rufst die Funktion falsch.
Die Funktion MessageBox selbst schließt sich nicht.
Definiere in dem Modul noch die Funktion
Code:
Sub subTMsgBox(Prompt As String, Optional ZeitinMilliSekunden As Long, _
               Optional Art As Long)
    If ZeitinMilliSekunden = 0 Then ZeitinMilliSekunden = 2000
    If Art = 0 Then Art = MB_OK Or MB_ICONINFORMATION
    hWnd = FindWindow(GC_CLASSNAMEMSACCESS, vbNullString)
    '2000 Millisekunden
    SetTimer hWnd, 0&, ZeitinMilliSekunden, AddrOf("prcTimer")
    MessageBox hWnd, Prompt, strBoxTitle, Art
End Sub

Sub xxx()
    subTMsgBox "Hier"
    subTMsgBox "Hier auch", 1000
End Sub
Warum nimmst du nicht die Originalfunktion (2. Beitrag von Willi) vom Anfang des Themas. Die ist doch am einfachsten (allerdings nur volle Sekunden) !

[edit]
Fehler nach Hinweis von Nepumuk beseitigt Embarassed
[/edit]

_________________
Gruß Steffen
Gast



Verfasst am:
02. Jan 2007, 14:34
Rufname:

AW: Selbstschliessende MsgBox - AW: Selbstschliessende MsgBox

Nach oben
       

Hallo,
@nepumuk

ich habe an dem Modul nichts geändert. Was ich vorher geschrieben habe, war der Aufruf des MsgFenster über einen Button eines Testformulars.
Das MsgFenster öffnet sich, schließt aber nicht. Offensichtlich sind meine Parameter falsch. Embarassed
Gruß gerdstone
steffen0815
VBA-Programmierer


Verfasst am:
02. Jan 2007, 18:04
Rufname:

AW: Selbstschliessende MsgBox {Nachgefragt} - AW: Selbstschliessende MsgBox {Nachgefragt}

Nach oben
       

@gerdstone,
hast du meinen Beitrag gelesen Rolling Eyes

_________________
Gruß Steffen
Gast



Verfasst am:
03. Jan 2007, 11:00
Rufname:

AW: Selbstschliessende MsgBox {Nachgefragt} - AW: Selbstschliessende MsgBox {Nachgefragt}

Nach oben
       

Hallo,
@stefen0815

ja habe ich . Sad
Aber dieses MsgFenster landet oft nicht im Vordergrund. Crying or Very sad
Daher hatte ich gehofft, das es mit der anderen Lösung IMMER im Vordergrund ist.
Aber trotzdem vielen Dank für Eure Mühe.

Gruß
gerdstone Wink
steffen0815
VBA-Programmierer


Verfasst am:
03. Jan 2007, 11:19
Rufname:

AW: Selbstschliessende MsgBox {Nachgefragt} - AW: Selbstschliessende MsgBox {Nachgefragt}

Nach oben
       

@gerdstone:
... und hast du auch den 2. Teil gelesen:
Zitat:
ich denke mal du rufst die Funktion falsch.
Die Funktion MessageBox selbst schließt sich nicht.
Definiere in dem Modul noch die Funktion .....

_________________
Gruß Steffen
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
12. Mai 2008, 12:49
Rufname:
Wohnort: Leipzig


AW: Selbstschliessende MsgBox {Nachgefragt} - AW: Selbstschliessende MsgBox {Nachgefragt}

Nach oben
       

Hallo zusammen,

für die Nachwelt: Ich bin gerade auf einen Rechner mit Windows 2000 gestoßen, auf dem die Prozedur von Willi MsgFenster sich nicht automatisch schloss. Es lag offensichtlich an der zu alten Version des Windows Script Host. Version 5.6 installiert, danach schließt das MsgFenster.

Gruß
Lisa
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: MsgBox alle Werte anzeigen 15 frederikrik 310 18. Feb 2013, 22:29
frederikrik MsgBox alle Werte anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Wert in Tabelle prüfen und ggf. Msgbox 1 1748351 94 21. Dez 2012, 12:38
KlausMz Wert in Tabelle prüfen und ggf. Msgbox
Keine neuen Beiträge Access Tabellen & Abfragen: Ergebnis der Abfrage in Msgbox ausgeben 8 Müllermilch 1320 04. Nov 2011, 12:03
KlausMz Ergebnis der Abfrage in Msgbox ausgeben
Keine neuen Beiträge Access Formulare: Mit MsgBox Meldung ausgeben 20 Akima 3193 01. Dez 2010, 13:36
Akima Mit MsgBox Meldung ausgeben
Keine neuen Beiträge Access Formulare: "Berechnung läuft."...=> MsgBox 2 hopfen 1327 26. Okt 2010, 11:44
hopfen "Berechnung läuft."...=> MsgBox
Keine neuen Beiträge Access Formulare: MsgBox 3 tiss90 191 23. Jun 2010, 11:23
blackoutNO MsgBox
Keine neuen Beiträge Access Formulare: MsgBox, wenn Eingabe ID in Formular = ID in Tabelle 15 Gast_Sven 5452 28. Nov 2009, 20:18
doc007 MsgBox, wenn Eingabe ID in Formular = ID in Tabelle
Keine neuen Beiträge Access Formulare: Access VBA MsgBox 18 BobbyB 9776 23. Sep 2009, 10:30
BobbyB Access VBA MsgBox
Keine neuen Beiträge Access Formulare: MsgBox wenn Jahr>Format(Date, "yyyy") 2 SonnyCorleone 297 17. Sep 2009, 15:09
SonnyCorleone MsgBox wenn Jahr>Format(Date, "yyyy")
Keine neuen Beiträge Access Formulare: Msgbox 15 Daniela_58 500 17. Dez 2008, 12:31
Daniela_58 Msgbox
Keine neuen Beiträge Access Formulare: Mit MsgBox leere Felder prüfen 6 C.Peter 602 01. Nov 2008, 19:27
C.Peter Mit MsgBox leere Felder prüfen
Keine neuen Beiträge Access Formulare: Msgbox soll max Wert einer Abfrage wiedergeben 7 Butterblume 813 06. Okt 2008, 12:17
butterblume1008 Msgbox soll max Wert einer Abfrage wiedergeben
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Word VBA