2013-08-01 3 views
1

하이퍼 링크를 추가 할 수있는 가능성을 가진 collumn으로 테이블을 만들고 싶습니다.하이퍼 링크 만들기 버튼

사용자는 "하이퍼 링크 추가"라는 단추 또는 텍스트를 누를 수 있어야하며 기본 하이퍼 링크 상자가 나타납니다.

매크로의 일부로이 기능을 사용할 수 있습니까?

매크로를 기록하고 인터넷 검색을 시도했지만 내 문제와 비슷한 것을 찾을 수 없습니다. 그리고 레코드 매크로는 사용자가 연결할 주소를 선택하는 하이퍼 링크 상자를 여는 코드를 표시하지 않습니다.

답변

2

당신은 표시 할 수 있습니다 대화로 : 이것은 활성 셀, 또는 도형에 대한 하이퍼 링크를 생성합니다

If Application.Dialogs(xlDialogInsertHyperlink).Show Then 
    'they pressed Ok 
End If 

. 실제로에서 하이퍼 링크를 필요로하지 않는 경우

Dim hl As Hyperlink 

If Application.Dialogs(xlDialogInsertHyperlink).Show Then 
    'they pressed Ok 
End If 

Set hl = ActiveCell.Hyperlinks(1) 

: 당신은에서 읽을해야합니다 그래서, 예를 들어, 다른 방법으로 그들에있는 셀을 하이퍼 링크 정보를 반환하지 않습니다 당신은 단순히 대화 상자를 표시하려면

ActiveCell.Hyperlinks.Delete 'or, more likely, 
ActiveCell.Clear 

Ctrl-K 또는

Application.SendKeys "^k" 
다음, 그것으로 아무 것도하지 않는다 : 셀 (당신이 세부 사항을 저장 한 후에는 필요) 당신은 나중에 제거 할 수 있습니다

또는 빠른 액세스 도구 모음에 하이퍼 링크 삽입 단추를 추가하면됩니다.