Me explico el codigo funciona muy bien, me busca las formas y las rellena con una foto de una carpeta, el problema viene cuando se agrega un nuevo registro de persona nueva y no haya foto aun, me da un error y no ejecuta la macro me podrian ayudar a corregir el codigo por favor para que cuando no encuentre una foto de una persona nueva inserte una foto que diga no hay foto.
este es mi codigo actual
Set Autoforma = Hoja28.Shapes("_cFila" & Indice) 'Circulo de las fotos
With Autoforma
.Left = Hoja28.Cells(Indice + 11, DiaMin + 12 - 1).Left 'Comienza en la columna 12 -1 para que comience desde el borde
NombreImagen = Mid(Empleado.Value, 1, InStr(1, Empleado.Value, " ") - 1) & ".png"
RutaImagen = ActiveWorkbook.Path & Application.PathSeparator & "Fotos" & Application.PathSeparator & NombreImagen
.Fill.UserPicture RutaImagen
.Visible = msoTrue
End With
Por
jojanu54, · publicado
Hola a todos:
Ahora se viene lo mejor | Ayuda Excel
Este tema ha sido cerrado a nuevas respuestas.
Me gustaría que el moderador/administrado del foro que lo haya llevado a cabo nos proporcione una mínima explicación del porqué de tal actuación.
Mientras y continuando con el sentido deportivo del tema.
A todos los atléticos:
Una vez "muerto" el enemigo común, solo deseo que mañana veamos un gran partido de fútbol, y que gane el mejor.
Suerte @Toldeman.
PD: "La censura no es mas que una muestra de autofustración" (Anónimo)
.
.