주소가 다른 곳에서 참조 된 셀을 활성화하는 매크로

단일 행에 월과 연도 (1 월 -16, 3 월 17 일 등) 배열이 있습니다. 마법처럼주소가 다른 곳에서 참조 된 셀을 활성화하는 매크로

=CELL("address",INDEX(E3:BL3,MATCH(D1,E3:BL3,0))).

작품 : 그 주어진 년, 월의 주소를 (내가 드롭 다운 메뉴에서 선택한 월 및 연도 기준) 현재 월을 찾아 뱉어 수식을 가지고있다. 이제 주소를 포함하는 셀을보고 주소를 참조하는 셀을 활성화하는 매크로를 프로그래밍 할 수 있어야합니다.

예를 들어, 밖으로 뱉어 주소가 Z3이면 매크로가 가서 Z3 셀을 활성화합니다. 매월 새로운 달과 새로운 셀을 참조 할 것이기 때문에 동적이어야합니다.

출처

2016-06-28 John Omstead

어떤 것을 시도 했습니까? 코드를 게시하십시오. – litelite

드롭 다운이 셀 A1에 연결되어 있다고 가정하면 수식에 표시된 셀 주소로 포커스를 이동할 해당 셀의 변경 사항에 대한 이벤트를 발생시킬 수 있습니다 (여기서는 B1이라고 가정 함). 다음 코드를 Workbook_SheetChange 이벤트에 추가하십시오.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) 
    If Target.Address = "$A$1" Then 
     Dim rngAddress As Range 
     Set rngAddress = ThisWorkbook.Sheets(1).Range("B1") 'Location of your address formula 
     ThisWorkbook.Sheets(1).Range(rngAddress.Value2).Select 
    End If 
End Sub

출처

2016-06-28 20:38:44 nbayly

감사! "Workbook_SheetChange"이벤트에 코드를 삽입하면 무엇을 의미합니까? (저는 VBA에 익숙하지 않습니다)? 보통 매크로를 추가하고 모듈 상자에 코드를 작성합니다. 이것은 같은 것이 아닌가? –

나는 내가 성취하고자하는 모든 것을 설명해야한다고 생각한다. 월별로 결과를 출력하는 스프레드 시트이다. 매달 실제 모델을 업데이트합니다. 요약 페이지의 주소를 뱉어 내고 참조 된 셀이있는 전체 열을 강조 표시해야하는 수식이 있습니다. 전체 열이 복사되어 오른쪽으로 붙여 넣습니다. 이 동일한 순서는 여러 탭에서 반복됩니다 (각 탭의 동일한 열). –

추가 표시는 원래 질문의 범위를 벗어나는 것처럼 보입니다. 원래 게시 된 질문과 첫 번째 의견/질문을 바탕으로 ... VBA 창 (Alt + F11)을 열면 탐색기 패널에서 문서를 나타내는 VBA 프로젝트로 이동하십시오. Microsoft Excel 개체에서 "ThisWorkbook"개체를 두 번 클릭합니다. 제공된 코드를 붙여 넣을 수있는 페이지가 열립니다. 희망이 도움이됩니다. – nbayly

주소가 다른 곳에서 참조 된 셀을 활성화하는 매크로

답변

관련 문제