¿Qué debo cambiar en la macro de Excel para detectar la fórmula que tengo en la celda?

Tengo la siguiente macro la cual consiste en leer los datos que están en la celda D9 y buscar las foto con ese nombre en una carpeta. El problema es cuando tengo una fórmula (buscarv) en la celda D9 y la macro no detecta la fórmula. Solo si dígito manualmente el nombre de la foto en esa celda funciona, ¿qué debería cambiar en la fórmula?

Private Sub Worksheet_Change(ByVal Target As Range)

Dim Ruta As String
On Error Resume Next
If Target.Address = ("$D$9") Then
nombre = Target.Value
Ruta = "C:\FOTOS ETIQUETA JPG\" & nombre & ".jpg"
If Existe(Ruta) Then
'Existe el archivo
ActiveSheet.Image1.Picture = LoadPicture(Ruta)
Else
'No existe el archivo
ActiveSheet.Image1.Picture = LoadPicture("C:\FOTOS ETIQUETA JPG\nodisponible.jpg")
End If
End If
End Sub
Function Existe(Archivo As String) As Boolean
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(Archivo) Then
Existe = True
Else
Existe = False
End If
End Function