Using this (i took out the .offset from the last one) from Craig and
now I can get it to find  the PO i am looking for, AND find the
column I want to put  it in, but it puts in the received PO on the
row above it. So if the PO I am looking for is in column A on row
13, I will put this in the correct column of E, but in row 12. I am
so close there has to be one small thing that is being overlooked
with this.:

Dim i As Integer
Dim a As Integer
Dim k As Integer
Dim aSheet() As Variant

aSheet = Array("Telxon Repair History", "3870 Repair History", _
"SF51 Repair History")

For k = 0 To UBound(aSheet())
Sheets(aSheet(k)).Select
Range("A1").Select
i = Cells(Rows.Count, "A").End(xlUp).Row
For a = 0 To i
If ActiveCell.Offset(a, 0).Value = recpo.Text Then
ActiveCell(a, 5).Value = recdate.Text
Exit Sub
End If
Next a
Next k