Insertar/borrar imagen en image1 (vba excel)
El frm_articulos (imagen de abajo) me funciona perfecto, exceptuando lo que esta en el recuadro rojo.
Necesito que al dar click en botón "cargar imagen" pueda seleccionar una imagen (y si se puede, que pase a la carpeta que tengo ). Y al dar click en botón "borrar imagen" se borre del form y de la carpeta.
Alguna idea/ayuda???
Por medio de esta linea de codigo en el boton borrar imagen:
Image1.Picture = Nothing
He conseguido borrar la imagen del image1, pero no de la carpeta. Y como tengo asociada la imagen al cbx_codigo pues cuando cierro y abro el form siguie la imagen ahi.
1 respuesta
Te anexo el código para borrar el archivo de la carpeta
Private Sub CommandButton1_Click() ' If cbx_codigo.Value <> "" Then ruta = "C:\trabajo\" arch = cbx_codigo.Value & ".jpg" If Dir(ruta & arch) <> "" Then Kill ruta & arch Image1.Picture = Nothing Else MsgBox "La imagen no existe en la carpeta" End If Else MsgBox "Selecciona un código" End If End Sub
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
¡Gracias!
Perfecto el código. Colocando la ruta de mi carpeta se borra la imagen de esa carpeta.
Muchas gracias.
Faltaría el botón para agregar imagen.
