Range Select from another worksheet

[rybussell]

Private Sub ComboBox1_Change()
 
Dim uCode As Integer
uCode = 1234
 
Dim Vals As String
  Vals = AccessCredentials.ComboBox1.Value
 
 
With Sheets("Sheet1").Range("A:A")
    Set c = .Find(Vals, LookIn:=xlValues)
      c.Select
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            'MsgBox (c)
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
End With
 
 
 
 
If ComboBox1 = "Applications" Then
Me.TextBox1.Value = ""
Me.TextBox2.Value = ""
Me.TextBox3.Value = ""
Me.TextBox4.Value = ""
Else
Me.TextBox1.Value = ActiveCell.Offset(, 4).Value & vbCrLf & ActiveCell.Offset(, 5).Value & vbCrLf & ActiveCell.Offset(, 6).Value & vbCrLf & ActiveCell.Offset(, 7).Value
Me.TextBox2.Value = ActiveCell.Offset(, 1).Value
Me.TextBox4.Value = ActiveCell.Offset(, 3).Value
If Me.TextBox5.Value = uCode Then
Me.TextBox3.Value = ActiveCell.Offset(, 2).Value
End If
End If
 
End Sub

This only works when Sheet1 is selected. If Sheet2 is selected, it returns an error of

1004
Select method of Range class failed.

Sheet1 and Sheet2 are the only sheets in my entire book... When I debug, it goes to the c.Select line...

I've tried referencing the Sheet1 exactly with Sheets("Sheet1").Range("A:A") and every other possible combination I can think of...
I do NOT want Sheet1 to need to be selected or even visible necessarily.
Also the Vals variable is set earlier in the code and returns the correct information...