728x90
| 엑셀 파일 다운로드 |
 |
| Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next With Target If Intersect(Target, Range("i7")) Is Nothing Then Else Worksheets(.Value).Activate End If End With End Sub |
728x90
'■ Excel > ㅡExcel VBA Code' 카테고리의 다른 글
| 목록 내용 차례대로 빨간색으로 변경하기 (0) | 2020.10.22 |
|---|---|
| 엑셀 vba 클립보드 내용 붙여넣기 따옴표 없애기 (0) | 2020.07.14 |
| 엑셀 VBA 미리보기창 실행 (0) | 2020.05.13 |
| 엑셀 VBA 페이지 나누기가 엉망이 될 때 (0) | 2020.05.13 |
| 엑셀 VBA 출력미리보기실행, 가운데정렬, 용지가로, 1개 페이지에 맞춤, 페이지 나누기 미리보기로 전환, 보기를 기본으로 전환 (0) | 2020.05.13 |