VBA 매크로 다음 페이지에서 첫 번째 빈 셀을 찾습니다.

Question

Excel에서 다음 페이지의 첫 번째 셀로 이동하는 매크로를 만들 수 없다는 것이 정말로 사실입니까?

안부

Answer 1

사용 Sheet.Index 후, 현재 시트의 인덱스를 찾아 마지막을 찾기 위해 Range.Find()를 사용하는 점유 다음 시트의 A 열에서 셀 :

Dim NextSheetIdx As Long 
NextSheetIdx = ActiveWorkbook.ActiveSheet.Index + 1 
If NextSheetIdx > ActiveWorkbook.Sheets.Count Then Exit Sub 

Dim InsertRange As Range 
Set InsertRange = ActiveWorkbook.Sheets(NextSheetIdx).Columns("A") _ 
     .Find("*", SearchDirection:=xlPrevious) 
If Not InsertRange Is Nothing Then 
    Set InsertRange = InsertRange.Offset(1) 
Else 
    Set InsertRange = ActiveWorkbook.Sheets(NextSheetIdx).Range("A1") 
End If 
InsertRange.Value = "ayy"