다섯개의 시트가 있습니다.For Each sht In ThisWorkbook.Worksheets sht.Range("a1").Select Debug.Print sht.Name & "의 ""A1""에 셀포인터를 이동했습니다."Next sht위 코드에서 다음 문장이 에러납니다.sht.Range("a1").Select자꾸 디버그 하랍니다. 해결 방법이 있을지요.
이렇게 할 수 있습니다
For Each sht In ThisWorkbook.Worksheets Application.Goto sht.Range("a1"), True Debug.Print sht.Name & "의 ""A1""에 셀포인터를 이동했습니다." Next sht
참아야지! 참아라! 그러면 잘 되어 갈 걸세. 친구여, 정말 자네 말이 맞네. 세상 사람들 틈에 끼여 날마다 일에 쫓기며, 다른 사람들이 하는 일과 그들의 행동을 보기 시작한 이후로 나는 나 지신과 휠씬 더 잘 타협할 수 있게 되었네. 젊은 베르테르의 슬픔 - 괴테