It's unclear whether you want a separate search form for each of the fields or a single search form to all the fields, like this:
Adjust names as required
Code:
Public Sub cmdSearch_Click()
Dim strSearch As String
Dim strFilter As String
strSearch = "'*" & Forms![YourFormName].txtCommentSearch & "*'"
Debug.Print strSearch
strFilter = _
"[Personnel] Like " & strSearch & _
" Or [Specifications] Like " & strSearch & _
" Or [InspectedDamages] Like " & strSearch & _
" Or [Comments] Like " & strSearch & _
" Or [SupplierVendor] Like " & strSearch
Debug.Print strFilter
Me.Filter = strFilter
Me.FilterOn = True
End Sub