Juan Carlos Florez respondió:
Reemplaza tu código por este: Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Address = "$H$12" Then nombre = Target.Value Ruta = "C:\certificados\" & nombre & ".jpg" If Existe(Ruta) Then 'Existe el archivo...
¿Qué macro utilizó para insertar una imagen en excel con referencia a una celda?