Generere automatiske linker til lydfiler

July 3  by Eliza

Clive er en fuglekikker og har over 300 MP3-filer av fuglelyder. Han ønsker å skape et Excel-regneark med en enkelt kolonne i som er listet opp de faktiske navnene på MP3-filer, for eksempel "cormorant.mp3". Han ønsker å opprette en hyperkobling fra hver av disse 300 eller så celler til den fysiske MP3-fil, slik at spilleren vil åpne og spille fuglen lyd. Han vet at han individuelt kan sette inn hyperlink, men det ville åpenbart være ganske kjedelig. Så han lurer på om det er en måte å automatisk lage en slik kobling basert på MP3 filnavn i regnearket.

Dette spørsmålet har faktisk to deler: Komme filnavnene inn et Excel-regneark og deretter lage en link til MP3-filen slik fuglesang kan spilles.

Begynne med å sørge for at alle MP3-filene er i samme mappe på harddisken. Hvordan du kan ta en oversikt over filer har blitt dekket i andre saker av ExcelTips; det kan være lurt å gjennomgå ideer om hvordan du gjør dette, finnes på denne ExcelTips side:

http://excelribbon.tips.net/T011144

Når navnene er i regnearket (la oss anta at de er i kolonne A), kan du enkelt bruke HYPERLINK regnearkfunksjonen for å sette sammen den faktiske link. For eksempel kan du plassere følgende i celle B1:

= HYPERLINK ("C: \ Documents \ fuglesang \" & A1)

Dette forutsetter at mappen der sangene er plassert er C: \ Documents \ fuglesang \. Hvis banen er faktisk annerledes, bare gjøre endringen i HYPERLINK funksjon.

Når den riktige formelen er i celle B1, kan du kopiere det ned for det imidlertid mange celler du trenger for å få alle de riktige hyperkoblinger.

Selvfølgelig kan du angi "skjerm teksten" å bli benyttet av HYPERLINK funksjon. Hvis fuglesang filer starte med fuglens navn og ender med .mp3, kan du legge skjermen tekst til HYPERLINK funksjon på denne måten:

= HYPERLINK ("C: \ Documents \ fuglesang \" & A1, VENSTRE (A1, LEN (A1) - 4)

Denne bruken bare strimler av de siste fire tegn (den perioden og "mp3") fra filnavnet og deretter bruker det som visningsteksten.

Hvis du vil bruke en makro tilnærming til faktisk lage hyperkoblinger (uten å bruke HYPERLINK funksjon), deretter et godt sted å begynne er med filnavnet vekk makro fra spissen referert til tidligere i dette tipset. Det kan bli endret for å sette ikke bare filnavnene inn i regnearket, men også for å skape de nødvendige hyperkoblinger:

Sub MakeHyperlinks ()
Dim Späth As String
Dim sFile As String
Dim iRow As Integer

'Spesifisere katalog å bruke - må slutte på "\"
Späth = "C: \ Documents \ fuglesang \"

iRow = 0
sFile = Dir (Späth)
Mens sFile <> ""
iRow = iRow + 1
Sheet1.Cells (iRow, 1) = sFile
sBird = Left (sFile, Len (sFile) -4)
ActiveSheet.Hyperlinks.Add Anchor: = Sheet1.Cells (iRow, 1), _
Adresse: = Späth & sFile, TextToDisplay: = sBird
sFile = Dir 'Få neste filnavn
Wend
End Sub

Hvis du bestemmer deg for å gå makro ruten, sørg for at det er ingenting i gjeldende regneark. Makroen går veldig raskt og tørker ut alt som er i cellene som den skriver. Når det er gjort, vil du ende opp med filnavnet i kolonne A og en hyperkobling til MP3-fil i kolonne B.

Når du klikker på en hyperkobling i regnearket, lanserer Excel nettleseren og laster MP3-fil. Leseren spiller deretter filen.

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (13127) gjelder for Microsoft Excel 2007, 2010, og 2013.