슬라이서를 기반으로 피벗 테이블의 링크를 복사 할 매크로 버튼

Question

모든 데이터가있는 피벗 테이블부터 시작합니다. 데이터 필드 중 하나는 궁극적으로 사용자를 보내려는 URL 문자열입니다.

피벗 테이블을 가능한 한 쉽게 검색하려면 사용자가 검색 조건을 클릭 할 수 있도록 몇 개의 슬라이서 창이 있어야합니다. 내가 원했던 것은 검색 기준 (한 번 결과로 좁혀 짐)에 기반하고 있으며 피벗 테이블에있는 링크로 자동으로 브라우저 (Internet Explorer라고 말하면 됨)를 시작하는 매크로 버튼이 있습니다.

브라우저 시작 (또는 텍스트 복사)을 확인할 수 있지만 피벗 테이블과 연결된 슬라이서 선택에 따라 매크로 버튼의 동작을 프로그래밍 할 수있는 방법이 있습니까?

도움이 될 것입니다.

Answer 1

정확하게 이해했다면 슬라이서를 적용한 후 피벗 테이블에 하나의 링크 만 나타나면 코드를 실행하고 싶습니다.

Worksheet_PivotTableChangeSync 이벤트 및 도우미 셀을 사용하여이를 수행 할 수 있습니다.

셀 G2에서 시작하여 G 열에 피벗 테이블이 있다고 가정 할 수 있습니다. 셀이 G1 인이 수식 =COUNTA(G3:G20)을 입력하십시오 (필요에 따라 범위를 조정하십시오).

는 워크 시트 모듈 (안 일반 모듈)에서이 코드를 입력합니다. 당신은 하나의 선택으로 피벗 테이블을 슬라이스 할 때

Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable) 
Dim a As Long 
a = Range("G1").Value 
If a = 1 Then 
    'your code for link in cell G3 
Else 
End If 
End Sub 

지금, COUNTA 식 1로 평가하고 Worksheet_PivotTableChangeSync 이벤트를 트리거합니다.