Avatar billede bof7500 Nybegynder
07. oktober 2007 - 15:15 Der er 4 kommentarer og
1 løsning

Excel-makro uden dong.wav fra internettet?

Jeg har i et excel-ark lavet et program, der opdtarer tips fra internettet. Når der er scoret, markeres en bolle ud for kampen, og lydfilen dong.wav afspilles.

Lydfilen har hidtil skullet ligge lokalt på pc'en, og makroen henviste således:

Sub Dong()
    Dim WAVFile As String
    Const SND_ASYNC = &H1
    Const SND_FILENAME = &H20000
    WAVFile = "c:\windows\dong.wav"
    Call PlaySound(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)
End Sub

Nu kunne jeg godt tænke mig at flytte lydfilen ud på internettet, så tipperne ikke skal have den liggende et bestemt sted lokalt. Men hvis jeg ændrer følgende linje, afspiller den alligevel ikke lyden - og giver heller ingen fejl:

    WAVFile = "http://www.tipsnorderne.dk/dong/dong.wav"

Er Excel ikke glad for at bruge f.eks. lydfiler fra internettet, eller findes der en løsning?

Og vil jeg kunne ændre filen til mp3 (så den fylder mindre) og bruge denne i stedet?
Avatar billede kabbak Professor
07. oktober 2007 - 20:30 #1
Jeg har tjekket lidt på emnet.
Hvis du i kontrolelementer, under flere værktøjer, har "RealPlayer G2 Control"
så tag den og træk den ud på siden et sted, hvor den ikke er i vejen.
NB. i designtilstand er den usynlig, så du skal vide hvor du har tegnet den.

her er så koden til den.

Public Sub Dong()
Worksheets("Tipsupdate").RealAudio1.Source = "http://www.tipsnorderne.dk/dong/dong.wav"
Worksheets("Tipsupdate").RealAudio1.AutoStart = True
End Sub
Avatar billede bof7500 Nybegynder
09. oktober 2007 - 21:10 #2
Den har jeg desværre ikke på listen. Men jag har Windows Media Player. Kan vi bruge det til noget?

Og hvis ja - virker det mon så også, hvis jeg konverterer filen til mp3?
Avatar billede kabbak Professor
09. oktober 2007 - 22:42 #3
prøv denne

Public Sub Dong()
Worksheets("Tipsupdate").WindowsMediaPlayer1.URL = "http://www.tipsnorderne.dk/dong/dong.wav"
Worksheets("Tipsupdate").WindowsMediaPlayer1.AutoLoad = True
End Sub
Avatar billede bof7500 Nybegynder
10. oktober 2007 - 00:01 #4
Det virker perfetk. Tak igen. Lad mig give dig nogle point.
Avatar billede kabbak Professor
10. oktober 2007 - 00:20 #5
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester