Private Sub Worksheet_Change Inset, ar- varias imágenes

Tengo una duda respecto a una macro que estoy realizando, que se trata de aplicar Private Sub Worksheet_Change. Tengo dos imágenes en la hoja de Excel que se llaman "1 Rectángulo" y "2 Rectángulo". Cada una de estas imágenes va a rutas diferentes: una carpeta que se llama “hola” que nos da la imagen de "1 Rectángulo" en función del valor de “H7” y otra carpeta que es “adiós” que nos da la imagen de "2 Rectángulo" en función del valor de “L24”.

Finalmente, si las celdas L24 y H7 es NOEPI, entonces nos da la imagen que se llama así y que también está en cada carpeta.

Private Sub Worksheet_Change(ByVal Target As Range)

Dim RutaArchivo As String
Dim RutaImagen As String

On Error GoTo ErrorHandler1

RutaImagen = "C:\Users\User\Dropbox\Ima\hola\" & Sheets("Ficha").Range("H7").Value
ActiveSheet.Shapes("1 Rectángulo").Fill.UserPicture (RutaImagen)

On Error GoTo ErrorHandler2

RutaImagen2 = "C:\Users\User\Dropbox\Ima\adios\" & Sheets("Ficha").Range("L24").Value
ActiveSheet.Shapes("2 Rectángulo").Fill.UserPicture (RutaImagen2)

ErrorHandler1:
ActiveSheet.Shapes("1 Rectángulo").Fill.UserPicture ("C:\Users\User\Dropbox\Ima\hola\NOEPI.jpg")

ErrorHandler2:
ActiveSheet.Shapes("2 Rectángulo").Fill.UserPicture ("C:\Users\User\Dropbox\Ima\adios\NOEPI.jpg")

End Sub

¿Podrian por favor indicarme en que he podido fallar? El resultado que obtengo siempre es NO EPI.