Problema con macro buscador de imágenes

Elsa Matilde buenas tardes disculpa por molestarte nuevamente cree una macro para buscar imagen es esta

Private Sub Worksheet_Change(ByVal Target As Range)
rutaimagen = "C:\Users\Educars\Documents\piezas\" & Sheets("BUSCADORBD").Range("K9").Value
ActiveSheet.Shapes("FOTO").Fill.UserPicture (rutaimagen)

End Sub

Pero la parte de rutaimagen se me sombrea de amarillo toda esa linea y me sale error 9 en tiempo de ejecución subindice fuera del intervalo. Como puedo solucionarlo

NOTA= al hacer click en la parte sombreada amarilla sale un comentario que dice rutaimagen = vació

Saludos espero poder contar nuevamente con su ayuda.