Saltar al contenido

Macro Excel Buscador de Data y Imagen


DarkKaiser

Recommended Posts

publicado

De momento, ahí va lo de buscar imágenes:


Private Sub CommandButton1_Click()
BuscarImagen Image1
End Sub

Private Sub CommandButton2_Click()
BuscarImagen Image2
End Sub

Private Sub CommandButton3_Click()
BuscarImagen Image3
End Sub

Private Sub BuscarImagen(Marco As Control)
imagen = Application.GetOpenFilename("Imágenes (*.jpg), *.jpg")
If imagen <> False Then
Marco.Picture = LoadPicture(imagen)
Marco.ControlTipText = imagen 'Aquí guardamos la ruta de la imagen
End If
End Sub


[/CODE]

En cuanto a:

[color=#4D5153]favor de enseñarme señores Maestros[/color]

Solo recordarte que el foro es un lugar de consulta, no de formación.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.