검색결과 리스트
글
원하는 시트로 점프하기
Worksheets("시트명").Activate
예)시트명리스트에서 시트명을 클릭하면 해당되는 시트로 점프
End Sub
Worksheets("시트명").Activate
예)시트명리스트에서 시트명을 클릭하면 해당되는 시트로 점프
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 2 And ActiveCell.Value <> "" Then
Dim sheetName As String
sheetName = ActiveCell.Value
Worksheets(sheetName).Activate
End If
RECENT COMMENT