Какое по счёту первое совпадение в строке накопителе - VB

 If StringНакопитель Like "*" & "&" & StringСтрока & "&" & "*" = False Then
                    'добавляем & в начале и в конце строки, чтобы можно сравнивая строки добиваться точного совпадения
                    StringНакопитель = StringНакопитель & "&" & StringСтрока & "&"
 
                Else
 
                    'окрасить объект ... в ... цвет, HighlightColorIndex = wdYellow - выделение жёлтым цветом
                    '... последних знака в ... таблице, ... строке, ... ячейке выделить цветом ...
                    '1 в строке кода - это последний знак в таблице - концевая сноска
                    ActiveDocument.Range(ActiveDocument.Tables(1).Rows(1).Cells(1).Range.End - 1 - Len(StringСтрока), ActiveDocument.Tables(1).Rows(1).Cells(1).Range.End - 1).HighlightColorIndex = wdYellow
'как узнать какая по счёту та, первая, чтобы её покрасть тоже ??????
                End If

строка = &fdjsv&&dfbds&&твиты&&ивтми&&vdfsjvb&&мавм&&ЦЭ&&мывмьыви&&ивоитвы&&т мтыв&