Добавление второго комментария ко второй текстовой строке в макросе VBA

Question

Как бы я изменил этот код, чтобы найти 2-ю текстовую строку ("bbb") и добавить 2-й комментарий [например, «мой комментарий № 2»] к этому. Затем третий и так далее. Благодарю.

Sub CommentBubble()
'
' CommentBubble Macro
'
'
Dim range As range
Set range = ActiveDocument.Content

Do While range.Find.Execute("[X] No episodes of osteomyelitis") = True
ActiveDocument.Comments.Add range, "IF THIS OPTION IS CHECKED, YOU SHOULD COMPLETELY DELETE QUESTIONS 5 'a' THROUGH 'e'"
Loop

Do While range.Find.Execute("6. Does the veteran have any history of hospitalizations/surgery related to the bone condition?") = True
ActiveDocument.Comments.Add range, "IF 'NO' IS CHOSEN, DELETE THE CHART"
Loop

End Sub