2017-04-26 1 views
0

파워 포인트 문서의 모든 하이퍼 링크를 어떻게 찾을 수 있습니까?Microsoft PowerPoint 2010에서 하이퍼 링크 찾기

Ctrl 키 +에만 나에게 값을 제공하지만, 나는 전체 문서 내에 한 번에 하이퍼 링크를 모두 찾을 수 없습니다입니다 f를

+0

에서 VBA 코드를 사용하는 방법에 대한 연습이있다

Sub ShowMeTheHyperlinks() ' Lists the slide number, shape name and address ' of each hyperlink Dim oSl As Slide Dim oHl As Hyperlink For Each oSl In ActivePresentation.Slides For Each oHl In oSl.Hyperlinks If oHl.Type = msoHyperlinkShape Then MsgBox "HYPERLINK IN SHAPE" _ & vbCrLf _ & "Slide: " & vbTab & oSl.SlideIndex _ & vbCrLf _ & "Shape: " & oHl.Parent.Parent.Name _ & vbCrLf _ & "Address:" & vbTab & oHl.Address _ & vbCrLf _ & "SubAddress:" & vbTab & oHl.SubAddress Else ' it's text MsgBox "HYPERLINK IN TEXT" _ & vbCrLf _ & "Slide: " & vbTab & oSl.SlideIndex _ & vbCrLf _ & "Shape: " & oHl.Parent.Parent.Parent.Parent.Name _ & vbCrLf _ & "Address:" & vbTab & oHl.Address _ & vbCrLf _ & "SubAddress:" & vbTab & oHl.SubAddress End If Next ' hyperlink Next ' Slide End Sub 

코드 작성없이이 작업을 수행하는 방법은 잘못된 곳입니다. 대신 자매 SuperUser 사이트를 사용해보십시오. 코드에서이 작업을 수행 할 방법을 찾고 있다면 커뮤니티는 사용자가 최소한의 노력을 기울일 것으로 기대합니다. HInt : Google POWERPOINT SHOW HYPERLINK를 표시하면 하이퍼 링크를 나열하는 VBA가 포함 된 결과의 첫 페이지에 적어도 하나의 조회가 발생합니다. –

답변

0

당신은 분명히 할 수 HERE

에서 그냥 복사 - 붙여 넣기 VBA와 그것을 : 당신이 찾고 있다면 파워 포인트 HERE

관련 문제