Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Funktion MSGBOX bzw. WshShell.PopUp automatisch sclhießen lassen ( ohne verzögerung

Frage Entwicklung VB for Applications

Mitglied: thomas1972

thomas1972 (Level 1) - Jetzt verbinden

26.04.2013, aktualisiert 13:25 Uhr, 5649 Aufrufe, 3 Kommentare

Hallo, ich lasse in einem VBA per Loop diverse Aktionen durchführen.

In dieser Schleife wollte ich ein Informationsfenster einbauen ( nicht per Formular )


01.
' Forschritt anzeigen 
02.
Dim WshShell As Object 
03.
Dim ret As Integer 
04.
Set WshShell = CreateObject("WScript.Shell") 
05.
ret = WshShell.PopUp("Es wird " & sFile & " eingelesen", 1, "Status", 64)
Leider bekomme ich es nicht hin, dass das Fenster sich sofort schließt
Es funktioniert nur das Fenster mit Interval > 1 sec automatisch zu bestätigen.

Vielleicht kann mir jemand einen Tipp mit der Funktion MSGBOX bzw. WshShell.PopUp geben,
dass sobald das Fenster "aufpoppt", sofort ohne verzögerung direkt wieder schließen zu lassen (z.b. per send key "ESC", nur leider funktionier der regl. Sendkeys "{ENTER}" nicht. )

Vielleicht kann mir hier jemand einen Tipp geben
Mitglied: colinardo
26.04.2013, aktualisiert um 14:08 Uhr
Hallo Thomas1972,
wieso soll dann überhaupt ein Popup angezeigt werden wenn es dann sowieso keiner mehr lesen kann ?
Du willst wahrscheinlich eine Fortschrittsanzeige realisieren. Das könntest du, wenn es eine Office-Anwendung ist, in der Statusleiste einblenden, und zwar so:
Application.StatusBar = "Deine Meldung"
und ganz am Ende noch ein
Application.StatusBar = ""
damit die Statusleiste wieder freigegeben wird.
Grüße Uwe
Bitte warten ..
Mitglied: thomas1972
26.04.2013 um 20:57 Uhr
Hallo Uwe,

vielen dank für die Rückmeldung.
Ich setzte Access 2010 ein.
Hier erscheint immer der Hinweis:

Microsoft Visual Basic for Applications
Fehler beim Kompilieren:

Methode oder Datenobjekt nicht gefunden
OK Hilfe
Kann es sein, dass Access diese "Statusbar" nicht besitzt?
Bitte warten ..
Mitglied: thomas1972
26.04.2013 um 21:50 Uhr
Anscheinend hat z.b. Excel und Access unterschiede in VBA

für ACCESS lautet dieses

SysCmd acSysCmdSetStatus, "Test" -> Test in Statusbar anzeigen
SysCmd acSysCmdClearStatus -> Statusbar wieder löschen
Bitte warten ..
Ähnliche Inhalte
Windows 10
Kontextmenü Verzögerung bei .EXE Dateien (6)

Frage von Monto1 zum Thema Windows 10 ...

Windows Server
Drucker automatisch verbinden lassen (9)

Frage von 2Seiten zum Thema Windows Server ...

Windows Installation
gelöst Programm in "Programme und Funktionen" nichtmehr anzeigen lassen (9)

Frage von Hainoon zum Thema Windows Installation ...

Datenbanken
gelöst Access 2010 Insert Into bei Fehler Msgbox (2)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Verschlüsselung & Zertifikate
SSL Zertifikat für HTTPS (33)

Frage von Hendrik2586 zum Thema Verschlüsselung & Zertifikate ...

Grafikkarten & Monitore
24" oder 27" mit Full HD oder doch mehr Auflösung? (21)

Frage von brutzler zum Thema Grafikkarten & Monitore ...

Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...