Why am I getting a "subscript out of range" error in the
following code?

Sub CheckSplits()
Sheets("Attendance").Select
If Range("X1") = "T" Then
SplitsOff
AttendanceSplitsOnOff = True
End If
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 1
Sheets("StudentInfo").Select <=****HERE****
If Range("X1") = "T" Then
SplitsOff
StudentInfoSplitsOnOff = True
End If
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 1
End Sub