Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1612to1616
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1612to1616
1612to1616
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA-MsgBox automatisch akzeptieren

VBA-MsgBox automatisch akzeptieren
06.03.2018 10:54:10
Lio
Hi ihr lieben,
wie kann ich von Excel-Datei aus festlegen, dass beim Öffnen einer anderen Excel-Datei die MsgBox automatisch akzeptiert wird?
LG,
Lia

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 11:10:41
Hajo_Zi
nur durch automatische schließen nach Zeit. 
Option Explicit
Sub MsgZeit()
'   Blendet eine Msgbox nach 10 Sekunden automatisch wieder aus
'   von K.Rola
'   kein Verweis notwendig
Const bytZeit As Byte = 10
Dim objWSH As Object, intMSG As Integer
Set objWSH = CreateObject("WScript.Shell")
intMSG = objWSH.Popup("Ich bin in " & bytZeit & " Sekunden verschwunden!" & Space(10), _
bytZeit, "gebe bekannt...", vbOKCancel + vbQuestion)
Set objWSH = Nothing
End Sub

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Anzeige
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 11:14:40
Lio
Danke Hajo,
und das funktioniert für eine MsgBox die aus einer anderen Datei erzeugt wird?
GrußLio
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 11:30:03
Hajo_Zi
einfach testen. Ich sehe keinen Grund warum das nicht gehen soll.
Gruß Hajo
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 11:36:23
Lio
habe es probiert, es funktioniert, aber nicht so wie ich meinte. Entschuldige ich habe mich etwas falsch ausgedruckt
Es muss genau hier passieren 
Set wb = Workbooks.Open(fileName:=fileName,.EnableEvents=False)
das EnableEvents ist an der Stelle falsch und ich bin mir auch nicht sicher ob es das ist was ich suche, aber es soll während die Datei geöffnet wird sofort die MsgBox schließen.
Anzeige
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 11:41:17
Hajo_Zi
es ist also kein Msgbox sondern ein Hinweis von Excel?
Application.DisplayAlerts = False ' Mitteilungen
nicht vergessen wieder einschalten.
Gruß Hajo
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 13:31:24
Lio
Wenn sich dieses Workbook öffnet, kommt direkt nach 4 sec eine Meldung also eine MsgBox und diese möchte ich verhindern.
Set wb = Workbooks.Open(fileName:=fileName)
Also es ist kein Hinweis von Excel sondern ein Makro was diese MsgBox in der Datei erzeugt.
Lg und danke hajo
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 14:22:59
Hajo_Zi
Gut, nur wenige schauen auf Deinen Rechner und sehen die Datei und das Makro mit der MSGBOX.
Ich möchte gerne den Fehler im Original sehen.
Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.
Ein Nachbau sieht meist anders aus als das Original. Darum sollte das Original verlinkt werden.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten anonymisieren bzw. pseudonymisieren.
Gruß Hajo
Anzeige
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 14:38:52
Daniel
Hi
wenns ne echte Messagebox ist, gar nicht, bzw du müsstest die Messagebox in der Datei entsprechend umschreiben.
wenn die geöffnete Datei ein Worbbook_Open-Eventmakro hat, welches die Messagebox startet, so kannst du die Ausführung dieses Eventmakros so verhindern: 
Application.EnableEvents = False
Set WB = Workbooks.Open(...)
Application.EnableEvents = True

Es wird dann aber das komplette Makro nicht ausgeführt!
Gruß Daniel
AW: VBA-MsgBox automatisch akzeptieren
06.03.2018 14:41:02
Lio
Ja genau durch ewiges probieren habe ich es hinbekommen :-D !!!
Danke trotzdem für deine Antwort :_)
Anzeige

143 Forumthreads zu ähnlichen Themen

VBA - Hilfetexte für Funktionen wie MsgBox, InputB
Stefan

Hallo zusammen,
gibt es eine einfache Möglichkeit, in VBA Hilfetexte (welche ruhig einfachen Textfiles o.ä. entsprechen können) für Funktionen wie MsgBox, InputBox etc. zu hinterlegen?
Danke vorab und Gruß.
Stefan
12.06.2009 09:41:53
Thread-ID: 1080899
2 Beiträge
Anzeige
VBA MsgBox - Ausgabe verschiedener Werte
Dominic

Hallo zusammen,
ich habe in einer Excel Tabelle 5 Formularsteuerelemente (Kontrollkästchen) eingefügt und diese natürlich auf unterschiedliche Zellbezüge von N1 bis N5 gesetzt.
Je nach Auswahl der Kontrollkästchen / abhaken habe ich in N1 bis N5 natürlich nun ein "Wahr oder Falsch" steh...
22.01.2014 14:09:35
Thread-ID: 1346336
7 Beiträge
VBA Ppt MsgBox ohne Programm anzuhalten
Florian

Hallo alle zusammen,
ich habe ein Makro geschrieben mit welchem ich automatisiert aus Excel eine PowerPoint Präsentation erstelle und diese anschließend abspeichere. Bevor ich speichere habe ich eine msgbox vbYesNo in welcher der Nutzer bestätig, ob er die generierte Präsentation so abspeic...
04.08.2014 15:01:57
Thread-ID: 1374063
4 Beiträge
Anzeige
VBA Msgbox mit 2 Leerzeilen, richtig?
Dieter(Drummer)

Hi VBA Spezialisten,
ist die VBA Schreibweise richtig oder geht es auch kürzer, wenn ich 2 Leerzeilen in der Msgbox haben möchte?
Mein Testmakro, dass (auch) funktioniert:
Sub ZweiLeerzeilen() If MsgBox("Vor 2 Leerzeilen" & vbCrLf & "" & vbCrLf & "Nach 2 Leerzeilen...
10.11.2015 15:51:49
Thread-ID: 1457492
3 Beiträge
VBA MsgBox Ja/Nein funktioniert nicht?!
Bernd

Hallo zusammen,
ich bin begeisterter Leser dieses Forums und konnte hier schon viele Lösungen und hilfreiche Tipps finden. Leider bin ich jetzt an einem Punkt angekommen, zu dem ich hier und über Google keine Erklärung finden konnte.
Ich habe eine Userform, auf der ich mir Pfadangaben a...
27.11.2015 10:17:50
Thread-ID: 1461060
3 Beiträge
VBA Excel mit MSG BOX
ALI

Hallo,
ich habe folgende herausforderung.
Ich habe eine Einsatzplan mit mehreren LKW.
NAME Tag1 Tag2 Tag3 Tag4 Tag5
LKW1 10:00 10:00 11:00 11:00 11:00
LKW2 10:00 10:00 11:00 11:00 11:00
LKW3
Links stehen die LKW´s 1 - 3 in der Spalte.
17.12.2015 11:32:04
Thread-ID: 1464860
12 Beiträge
VBA - Werte aus Tabellenblatt in MsgBox ausgeben
Ansako78

Hallo zusammen
ich habe eingeschränkte VBA-Erfahrungen und versuche gerade folgendes: es gibt eine Tabelle, in der in Spalte 1 verschiedene Kontonummern stehen, die wiederholt vorkommen, und in Spalte 2 steht die Buchungsnummer der Belastung und in Spalte 3 der belastete Betrag (es gibt kei...
31.12.2015 18:26:05
Thread-ID: 1466572
5 Beiträge
mittels VBA "msgbox eingabe" eine Zahl suchen
Michel

Hallo liebe Excel Freunde
Ich habe hier eine Routine Aufgabe und möchte diese gerne automatisieren.
vielen Dank vorab für euer Feedback
Hier das File um was es geht:
https://www.herber.de/bbs/user/104662.xlsm
Dies ist ein Auszug aus dem SAP und kann je nach dem von der Date...
30.03.2016 15:53:48
Thread-ID: 1484875
4 Beiträge
Anzeige

Links zu Excel-Dialogen

MessageBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
5
6
3
2
2
2
11
4
3
5
6
4
8
9
2
3
2
7
10
7
1
2
3
5