Estoy haciendo un juego de memoria y deseo que al dar clic sobre una imagen, ésta cambie

Ya intenté de la siguiente forma:

Private Sub Image1_Click()
         Imagen = MostrarImagen(Me.Image1.Name)
         Image1.Picture = LoadPicture(ThisWorkbook.Path & "\Imagenes\" & Imagen)
        MsgBox ThisWorkbook.Path & "\Imagenes\" & Imagen
End Sub

La función Mostrar Imagen es para pasar el nombre de la imagen que debe aparecer y  compruebo que funciona con el msgbox, pero la imagen no se muestra en el control Image1. ¿Porqué o cómo hago para que se vea?