אקסל | תנאי בהגדרת טווח

[פלורידה]

יש לי את הקוד הזה (שנתן לי @amik)

' חיפוש מתוחכם
Public Sub chipus_daf()
ActiveSheet.Select
Dim rgresult As Range
Dim daf As String: daf = ActiveSheet.Range("a6").Value
Dim rgSearch As Range: Set rgSearch = ActiveSheet.Range("c7:ct120")
Set rgresult = rgSearch.Find(What:=daf, LookIn:=xlValues, SearchOrder:=xlByColumns)
If rgresult Is Nothing Then
MsgBox "לא נמצא דף " & daf
ActiveSheet.Range("a6").Value = Application.WorksheetFunction.Unichar(Application.WorksheetFunction.Hex2Dec("1F50d")) & "חיפוש "
Exit Sub
Else
rgresult.Activate
End If
'ActiveSheet.Range("a6").Value  =ChrU("U+1F50D") & "חיפוש"
ActiveSheet.Range("a6").Value = Application.WorksheetFunction.Unichar(Application.WorksheetFunction.Hex2Dec("1F50d")) & " חיפוש  "
Exit Sub
End Sub

בשורה 6 אני מעוניין שהקוד יחול רק על תאים מסויימים. אני רוצה שזה יהיה מותנה שיעבוד רק באם הוא עמודה1 בטבלה.

או למצער, שיעבוד רק בתוך טבלה...

תודה רבה