OKAY
It means you have a lot of data ....and the number of times the searched string appears is more than 32000 ????
Change

Dim NbT As Integer
to

Dim NbT As Long