Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1480to1484
1480to1484
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bild beim Öffnen

Forumthread: Bild beim Öffnen

Bild beim Öffnen
11.03.2016 13:05:25
Armin
Hallo Freunde,
ich möchte beim öffnen einer Excel-Datei ein Bild sich öfnnet und nach ein paar sekunden wieder abgeschloßen werden..(etwas wie Wellcome to Datei-xxx-yyy).
Geht so was oder gib es ein Makro dafür

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild beim Öffnen
11.03.2016 13:34:00
Steve
Hallo Armin,
klar geht sowas. Erstelle dir dazu eine Userform und öffne mit F4 das Eigenschaftsfenster. Versehe sie mit einem vernünftigen Titel (Caption-Eigentschaft) und wähle ein Hintergrundbild (Picture-Eigenschaft).
Dann den Code-Bereich der Userform öffnen und folgendes Makro reinpacken. 
Private Sub UserForm_Activate()
Application.Wait (Now + TimeValue("00:00:03"))
Unload Me
End Sub

Fertig.
lg Steve

Anzeige
AW: Bild beim Öffnen
11.03.2016 13:35:31
Steve
Achja,
in den Code-Bereich von "Diese Arbeitsmappe" noch folgendes Makro einfügen:
Private Sub Workbook_Open()
UserForm1.Show
End Sub
Damit wird beim Öffnen der Mappe deine Userform aufgerufen.
lg Steve

AW: Bild beim Öffnen
11.03.2016 16:13:40
Armin
Vielen dank..aber das Bild bleibt immer da..und verschwindet nicht

Anzeige
AW: Bild beim Öffnen
11.03.2016 16:45:15
Steve
Hallo Armin,
das kann ich nicht nachvollziehen. Wenn du den Codeschnipsel in die Userform hinein gepackt hast, sollte das funktionieren (Rechtsklick auf die UserForm - Code anzeigen). Er wartet in dem Fall drei Sekunden nach Aufruf der Userform und beendet sie dann. Da kann eigentlich nix schiefgehen. 
Private Sub UserForm_Activate()
Application.Wait (Now + TimeValue("00:00:03"))
Unload Me
End Sub
lg Steve
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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