¿Cómo busco un texto en los comentarios de forma automática en E xc

hola, Hugo !

Probe con distintas funciones, pero no obtuve resultados

prueba definiendo una funcion personalizada +/- como la siguiente:
(en un modulo de codigo estandar en el editor de vba):

Function LeerComentario(Celda As Range) As String
On Error GoTo Salida
LeerComentario = Celda.Cells(1).Comment.Text: Exit Function
Salida:
LeerComentario = "Error en comentario !!!"
End Function

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.