Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1480to1484
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
Inhaltsverzeichnis

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

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

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

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

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

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige