макрос открытия гиперссылок

[sersh1]

Добрый день!
Подскажите, пожалуйста, в столбце (наименование позиций прайса) есть гиперсылки (но не на всех позициях), есть макрос который открывает гиперссылки, если отмечена данная позиция по прайсу, но выдает ошибку. ошибка возникает, когда макрос доходит до строки, которая тоже отмечена, но не является гиперссылкой.
Как можно исправить макрос?

[doober]

например так

For i = 1 To P

        If Cells(i + 1, 23) <> "False" Then
     If Cells(i + 11, 1).Hyperlinks.Count > 0 Then
     Cells(i + 11, 1).Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
       End If
            
    End If
Next i

[sersh1]

Спасибо вам огромное, все заработало...спасли меня....