Office: Videos in Userform abspielen

Hallo,

vielleicht hat von euch jemand eine Idee, wie ich in meiner Mappe in der userform "BluRayListe" Videos abspielen kann?

Mit meiner Mappe verwalte ich meine Videos und ich würde dort gern zu jedem Film, den ich in der userform anwähle mit einem Klick auf dem Cover z.B., oder auf andere Art den passenden Trailer abpielen kann.


Das ist doch sicher möglich, oder?

Ich hoffe auf ne tolle Lösung

Gruß an alle

:)

 

Hallo,
Guckst Du VBA User Forms videos | Excel VBA Forms Pt 16 - Playing YouTube Videos

 

Hallo Albert,

das sieht ja perfekt aus, was dort in dem Video gezeigt wird.......leider kann ich kein Englisch *Smilie

Ich hatte da an Videodateien gedacht, die ich lokal auf Platte habe und dann in meiner Userform abspielen kann.

Ich kann schon nicht programmieren und schon garnicht das einbauen, was dort gezeigt wird. *wink.gif*

Gruß
Neo

 

moin

hier mal ein Beispiel mit dem Windowsmediaplayer
in meinem Test ist das Video im Ordner Filmcovers (anpassen)
in der Textbox den Filmtitel eingeben
in meinem Test hatte ich ein .avi
wenn deine Trailer in einem anderen Format sind dann im Code anpassen

was mir dabei allerdings nicht gefällt, ist dass der player sich an die Dateigröße anpasst
habe aber nicht gefunden wie man den Player auf feste Größe einstellt

MfG Tom

 

Windows Media Player Control.

ABER: Kein Englisch, keine VBA Kenntnisse... willst Du hier eine fertige Anwendung "abstauben"? Oder was soll das werden?

 

s. mein Beispiel

 

Hallo Storax

jo jetzt hab ich es gerafft
ich hatte es vorher schon mit den Größenangaben versucht
dachte das stretchtofit im Eigenschaftsfenster würde genügen
aber Größe und stretch im Initialize hat den gewünschten Effekt erzielt


MfG Tom

 

Hallo Tom,

ich hab es mal versuch einzubauen, doch mehr wie die Userform mit dem Player zu starten passiert nichts?

 

hallo Storax....ich will nichts abstauben, sondern auch lernen wie das geht, wenn man mir das auf deutsch erklärt *wink.gif*

 

Hallo Tom,

ich hab es hinbekommen den Player einzubauen und auch zu starten und zu beenden.

Sieht aber wirklich nicht so schön aus mit der Fenstergröße.

Wie kann ich jetzt hinbekommen, das ich den Filmnamen nicht selber eingeben muss, sondern der Filmname nach Abfrage meiner Textbox20 in der userform "BluRayListe" automatisch in der TextBox von der Userform1 eingetragen wird....und das immer automatisch, wenn ich in der userform "BluRayListe" den Film wechsle?

Gruß
Neo

 

Guten Morgen Neo,
Es ist ja der Sinn der Sache in einen Forum das man sich gegenseitig hilft und auch helfen kann.
Doch wenn Du in der Zeit wo Du auf Antworten wartest auch ab und zu mal ein YouTube Video über VBA Dir reinziehst dann wirst Du bald die nötigen Grundlagen verstehen und auch das ein oder andere Problem schon bald selbst lösen können *Smilie
Denn es nutzt ja wenig wenn man von einen Forum zum anderen galoppiert und Codesnippsel sammelt.
Und eine Grundlage der VBA Programmierung ist die verwendung von aussagekräftiben Variablen oder Textboxen, Userformen und dergleichen, damit ein Helfer sich nicht wundern muß wo befindet sich denn diese Textbox20 *Smilie
Denn wenn die Textbox20 z.B. als txtFilmName oder txtFilmEingabe benann wäre dann würde es doch etwas einfacher werden. Für Dich zumindest gleich als für alle anderen!

 

Hallo Michael

hier ist deine Datei zurück
schau mal ob es so passt
wenn das so ok ist dann sag auch bitte im anderen Forum dass das Thema gelöst ist


MfG Tom

 

Hallo Tom,

ich danke dir.
Ich kann die Datei hier auf der Arbeit nicht öffnen, sobald ich in der Userform "BluRayListe", stürzt hier Excel ab.

Ich muss es später bei mir zu Hause ausprobieren, ob es da auch so ist.

Ich gebe Rückmeldung.

Gruß
Michael

PS: Alle denken, das ich nichts lernen will?! Ich habe in dieser Mappe noch meine Adressverwaltung und wollte mich ab dieser ranmachen, wenn ich die Videoliste fertig habe.
Also mit Hilfe aller Codes, diese so umzuschreiben, das ich sie für die Adressverwaltung auch nutzen kann.
Ich Google dann nach allen befehlen, was sie bedeuten und wie man sie anwendet, dann ist es schon mal gut, das ich aktuell ein Beispiel in meiner eigenen Mappe habe?

 

Hallo Albert,

danke für deine Nachricht *Smilie

Aber genau das habe ich gemacht, beschrieben, wo die TextBox20ist:

sie letzten Eintrag von mir :
Wie kann ich jetzt hinbekommen, das ich den Filmnamen nicht selber eingeben muss, sondern der Filmname nach Abfrage meiner Textbox20 in der userform "BluRayListe" automatisch in der TextBox von der Userform1 eingetragen wird....und das immer automatisch, wenn ich in der userform "BluRayListe" den Film wechsle?
*wink.gif* *wink.gif* *wink.gif*

Gruß
Neo

 

hallo ist das forum noch aktuell