Visual Basic para Aplicaciones - ayuda con macro

nesecito crear una funcion que permita que al digitar en la celda de consulta me arrojara como respuesta lo que aparece abajo. Hice una funcion en una macro, lo que pasa es que al cambiar cualquier dato por ejemplo en vez de maria pongo carlos no refresca la funcion
01 maria consulta: maria
02 carlos respuesta: 01,03
03 maria

No esta muy claro lo que quieres, pero una "aproximación" seria..

Public Function Mi_Funcion(ByVal Dato As String) As String
Dim sRes As String

Select Case Dato
Case "01"
sRes = "Maria"
Case "02"
sRes = "Carlos"
Case "03"
sRes = "Luis"
End Select
Mi_Funcion = sRes

End Function

Algo similar realiza la funcion ELEGIR, checalo en la ayuda, primero debes de evaluar si alguna función de Excel resuelve tu problema, saludos...

bueno el nombre puede ser cualquiera (charo,pedro,raul,etc), pero hize una funcion lo que pasa es que si cambio algun dato, la funcion no se refresca
gracias de todas maneras