Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

rotierende Sanduhr (Showeffekt)

Forumthread: rotierende Sanduhr (Showeffekt)

rotierende Sanduhr (Showeffekt)
Mirko
Liebe VBA Experten,
ich würde gerne eine sich drehende Sanduhr oder ein derartiges Symbol vor der Darstellung eines Rechenergebnisses einblenden. Die Berechnung an sich braucht kaum ne Sekunde, weswegen ich hier ein delay von sagen wir 3 sekunden einbauen würde. In dieser Zeitspanne würde ich gerne die Sanduhr einblenden um damit die Wichtigkeit des zu erwartenden Ergebnisses zu zeigen - an sich Show, aber wenn einer von euch eine coole Grafik kennt, dann würde ich sowas sehr gerne nutzen.
Vielen Dank für eure Hilfe!!!
Beste Grüße
Mirko
Anzeige

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

Betreff
Benutzer
Anzeige
AW: rotierende Sanduhr (Showeffekt)
12.02.2011 12:11:10
PeTeR
Hallo Mirko,
ich kenn zwar auch keine Sanduhr in VBA aber als alternativen Show-Effekt findest du unter http://www.office-loesung.de/ftopic68144_0_0_asc.php eine Fortschrittsanzeige.
Viel Erfolg
PeTeR
AW: rotierende Sanduhr (Showeffekt)
12.02.2011 12:56:02
Reinhard
Hallo Mirko,
wenn du sowas meinst, k.A. wie man ein animiertes Gif in Vba bzw. Excel einbaut daß es sich dreht.
In XL2000 nicht kann in XL2007 kann man das Gif über Strg+v einfügen und dann manuell seitwärts drehen.
Leider zeichnet der makrorekorder das nicht auf, könnte aber gehen, schau mal hier ins Archiv.
Oder baust dir dazu ein Java-Scribt in ein Browserfensterchen in Excel, wie hier:
http://www.devtrain.de/artikel_866.aspx
K.A. wie und ob das geht :-(
Gruß
Reinhard
Anzeige
AW: rotierende Sanduhr (Showeffekt)
12.02.2011 14:46:44
Anneliese
Hallo Mirko,
schau mal unter
http://beverly.excelhost.de/
und da unter
Beispiele m. VBA
Gruß
Anneliese
AW: rotierende Sanduhr (Showeffekt)
13.02.2011 14:41:22
Mirko
Hallo Anneliese, Reinhard und Peter!
vielen Dnak für eure Informationen! Ich würde genauso eine Sanduhr wie sie von Reinhard gezeigt wurde suchen. Ich werde mal schauen ob etwas passiert, wenn ich das entsprechende Makro eingebe.
Ich lasse euch wissen worauf ich gekommen bin, ev. wollt braucht Ihr das dann auch mal.
Beste Grüße
Mirko
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Rotierende Sanduhr in Excel mit VBA


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und drücke Alt + F11, um den VBA-Editor zu starten.

  2. Füge ein neues Modul hinzu: Klicke auf Einfügen > Modul.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub ShowLoadingSandClock()
        Dim ws As Worksheet
        Set ws = ThisWorkbook.Sheets(1) ' Anpassen auf das gewünschte Blatt
    
        ' Füge das GIF einer Sanduhr ein
        ws.Pictures.Insert("C:\Pfad\zu\deinem\sanduhren.gif").Select
    
        ' Positioniere das GIF in der Mitte des Blattes
        With Selection
            .Top = (ws.Cells(1, 1).Top + ws.Cells(10, 1).Top) / 2
            .Left = (ws.Cells(1, 1).Left + ws.Cells(1, 5).Left) / 2
            .ShapeRange.LockAspectRatio = msoFalse
            .Width = 100
            .Height = 100
        End With
    
        ' Zeige die Sanduhr für 3 Sekunden
        Application.Wait (Now + TimeValue("0:00:03"))
    
        ' Lösche die Sanduhr
        ws.Pictures(ws.Pictures.Count).Delete
    End Sub
  4. Passe den Pfad zur Sanduhr-Grafik in der Zeile ws.Pictures.Insert("C:\Pfad\zu\deinem\sanduhren.gif") an.

  5. Führe das Makro mit F5 aus.

Damit wird eine Sanduhr angezeigt, während eine Berechnung durchgeführt wird. Du kannst diese Methode auch für andere Animationen verwenden, indem du ein passendes gif sanduhr einfügst.


Häufige Fehler und Lösungen

  • Das GIF wird nicht angezeigt: Überprüfe den Dateipfad zur Sanduhr. Stelle sicher, dass die Datei tatsächlich existiert.
  • Die Sanduhr bleibt nicht stehen: Stelle sicher, dass die Wait-Anweisung korrekt implementiert ist.
  • Excel stürzt ab: Überprüfe, ob du die richtige Excel-Version verwendest. In älteren Versionen kann dies zu Problemen führen.

Alternative Methoden

Sollte die Verwendung eines gif sanduhr nicht funktionieren, kannst du folgende Alternativen ausprobieren:

  • Fortschrittsanzeige: Verwende eine Fortschrittsleiste, um den Showeffekt zu simulieren, wie von PeTeR vorgeschlagen.
  • JavaScript in einem Browserfenster: Erstelle eine einfache HTML-Seite mit einer animierten Sanduhr und öffne sie in Excel.

Praktische Beispiele

Hier sind einige praktische Anwendungen für die rotierende Sanduhr:

  • Datenanalyse: Zeige eine Sanduhr an, während große Datenmengen verarbeitet werden.
  • Berichtserstellung: Verwende den Effekt, um den Benutzer auf das Laden eines Berichts hinzuweisen.
  • Interaktive Dashboards: Setze die Sanduhr ein, um die Wartezeit bei der Aktualisierung von Daten zu verdeutlichen.

Tipps für Profis

  • Verwende transparente GIFs: Um die Sanduhr ästhetisch ansprechend zu integrieren, benutze eine leere sanduhr oder transparente Sanduhren, die sich nahtlos in das Design deiner Excel-Datei einfügen.
  • Animationen optimieren: Achte darauf, dass die Animation nicht zu lange dauert, um die Benutzererfahrung positiv zu gestalten.
  • Mit der Sanduhr spielen: Experimentiere mit verschiedenen sanduhr gif-Animationen, um die beste Wirkung zu erzielen.

FAQ: Häufige Fragen

1. Wie kann ich eine andere Animation verwenden?
Du kannst jede Art von GIF verwenden, indem du den Pfad im VBA-Code anpasst.

2. Funktioniert das auch in Excel für Mac?
Einige Funktionen sind möglicherweise eingeschränkt. Teste die Anwendung auf deinem System, um die Kompatibilität sicherzustellen.

3. Was ist die Bedeutung der Sanduhr in der Liebe?
Die sanduhr bedeutung liebe symbolisiert oft Geduld und das Warten auf das richtige Timing in Beziehungen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige