오디오 파일에 대한 자동 링크 생성 (Microsoft Excel)
Clive는 조류 관찰자이며 300 개 이상의 새 소리 MP3 파일을 보유하고 있습니다. 그는 MP3 파일의 실제 이름 (예 : “cormorant.mp3”)이 나열된 단일 열이있는 Excel 워크 시트를 생성하려고합니다. 그는 300 개 정도의 셀 각각에서 실제 MP3 파일로의 하이퍼 링크를 만들어 플레이어가 새 소리를 열어 재생하도록하려고합니다. 그는 개별적으로 하이퍼 링크를 삽입 할 수 있다는 것을 알고 있지만 분명히 매우 지루할 것입니다. 그래서 그는 워크 시트의 MP3 파일 이름을 기반으로 이러한 링크를 자동으로 생성하는 방법이 있는지 궁금합니다.
이 질문은 실제로 두 부분으로 구성됩니다. 파일 이름을 Excel 워크 시트로 가져온 다음 새 노래를 재생할 수 있도록 MP3 파일에 대한 링크를 만듭니다.
모든 MP3 파일이 하드 드라이브의 동일한 폴더에 있는지 확인하여 시작하십시오. 파일 목록을 가져 오는 방법은 ExcelTips_의 다른 문제에서 다루었습니다. 이 작업을 수행하는 방법에 대한 아이디어를 검토 할 수 있습니다. _ExcelTips 페이지 :
http://excelribbon.tips.net/T011144
이름이 워크 시트에 있으면 (A 열에 있다고 가정) HYPERLINK 워크 시트 함수를 사용하여 실제 링크를 쉽게 만들 수 있습니다. 예를 들어 셀 B1에 다음을 배치 할 수 있습니다.
=HYPERLINK("C:\Documents\Birdsongs\" & A1)
노래가있는 폴더는 C : \ Documents \ Birdsongs \라고 가정합니다. 경로가 실제로 다른 경우 HYPERLINK 기능에서 변경하십시오.
B1 셀에 올바른 수식이 있으면 올바른 하이퍼 링크를 모두 가져 오는 데 필요한 여러 셀에 대해 복사 할 수 있습니다.
물론 HYPERLINK 기능에서 사용할 “표시 텍스트”를 지정할 수 있습니다. 새의 노래 파일이 새 이름으로 시작하고 .mp3로 끝나는 경우 다음과 같은 방식으로 표시 텍스트를 HYPERLINK 함수에 추가 할 수 있습니다.
=HYPERLINK("C:\Documents\Birdsongs\" & A1, LEFT(A1, LEN(A1) - 4)
이 사용법은 파일 이름에서 마지막 4 자 (마침표 및 “mp3”)를 제거한 다음 표시 텍스트로 사용합니다.
HYPERLINK 함수를 사용하지 않고 실제로 하이퍼 링크를 생성하기 위해 매크로 접근 방식을 사용하려는 경우이 팁의 앞부분에서 언급 한 팁의 파일 이름 잡아 매크로를 사용하는 것이 좋습니다. 워크 시트에 파일 이름을 넣을뿐만 아니라 필수 하이퍼 링크를 만들도록 수정할 수 있습니다.
Sub MakeHyperlinks() Dim sPath As String Dim sFile As String Dim iRow As Integer 'specify directory to use - must end in "\" sPath = "C:\Documents\Birdsongs\" iRow = 0 sFile = Dir(sPath) While sFile <> "" iRow = iRow + 1 Sheet1.Cells(iRow,1) = sFile sBird = Left(sFile, Len(sFile)-4) ActiveSheet.Hyperlinks.Add Anchor:=Sheet1.Cells(iRow,1), _ Address:=sPath & sFile, TextToDisplay:=sBird sFile = Dir ' Get next filename Wend End Sub
매크로 경로를 사용하기로 결정한 경우 현재 워크 시트에 아무것도 없는지 확인하십시오. 매크로는 매우 빠르게 실행되며 기록하는 셀에있는 모든 항목을 지 웁니다. 완료되면 A 열의 파일 이름과 B 열의 MP3 파일에 대한 하이퍼 링크로 끝납니다.
워크 시트에서 하이퍼 링크를 클릭하면 Excel이 웹 브라우저를 시작하고 MP3 파일을로드합니다. 그러면 브라우저가 파일을 재생합니다.
_ 참고 : _
이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.
link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요]
.
_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.
이 팁 (13127)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다.