ich möchte gerne per Button, wenn ich drauf klicke den Windows Media Player starten.
Es soll eine bestimmte Datei in einem bestimmten Laufwerk geöffnet werden im Windows Media Player.
Ist dies möglich?
Danke.
Sub Anwendung_Media_Player()
Dim Anwendung As Integer
Anwendung = Shell("C:\Programme\Windows Media Player\wmplayer.exe", vbNormalFocus)
AppActivate Anwendung
End Sub
Gruß
Tino
Um den Windows Media Player per Code zu starten, kannst du den folgenden VBA-Code verwenden. Dieser Code öffnet den Media Player und spielt eine bestimmte Datei ab.
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
Füge den folgenden Code in das Modul ein:
Sub Anwendung_Media_Player()
Dim Anwendung As Integer
Anwendung = Shell("C:\Programme\Windows Media Player\wmplayer.exe", vbNormalFocus)
AppActivate Anwendung
End Sub
Schließe den VBA-Editor und gehe zurück zu Excel.
Erstelle einen Button auf deinem Arbeitsblatt und weise ihm das Makro Anwendung_Media_Player zu.
Klicke auf den Button, um den Windows Media Player zu starten.
Fehler: Der Windows Media Player öffnet sich nicht.
wmplayer.exe korrekt ist. Überprüfe, ob der Windows Media Player installiert ist.Fehler: Das Makro läuft nicht.
Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter und aktiviere Makros.Eine andere Möglichkeit, den Windows Media Player zu starten, ist die Verwendung des Shell-Befehls mit einer Datei. Zum Beispiel:
Sub Starten_Media_Player()
Shell("C:\Programme\Windows Media Player\mplayer2.exe Pfad\Zur\Datei.mp3", vbNormalFocus)
End Sub
Diese Methode spielt die Datei direkt im Windows Media Player ab.
Hier sind einige praktische Beispiele, um den Windows Media Player zu starten:
Mit einer bestimmten Datei:
Sub Öffnen_Mit_Datei()
Shell("C:\Programme\Windows Media Player\wmplayer.exe " & """C:\MeinOrdner\MeinLied.mp3""", vbNormalFocus)
End Sub
Mit dem Win Media Player:
Sub WinMediaPlayer_Starten()
Shell("C:\Programme\Windows Media Player\wmplayer.exe", vbNormalFocus)
End Sub
In diesen Beispielen wird der Windows Media Player geöffnet und spielt die angegebene Datei ab.
AppActivate-Funktion, um sicherzustellen, dass der Windows Media Player im Vordergrund ist.wmp code in Kombination mit anderen Excel-Funktionen nutzen, um ein umfassenderes Skript zu erstellen.1. Wie kann ich den Windows Media Player als Standardanwendung einstellen?
Um den Windows Media Player als Standardanwendung einzustellen, gehe zu Einstellungen > Apps > Standard-Apps und wähle den Windows Media Player für die entsprechenden Dateitypen aus.
2. Funktioniert dies auch mit Windows Media Player 10?
Ja, der Code funktioniert auch mit Windows Media Player 10, solange der Pfad zur wmplayer.exe korrekt ist.
3. Welche Excel-Version benötige ich? Der angegebene Code funktioniert in den meisten modernen Excel-Versionen, einschließlich Excel 2010 und höher.