Saltar al contenido
View in the app

A better way to browse. Learn more.

Ayuda Excel

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Cambiar imagen según el contenido de una celda

publicado

Buenas tardes a todos, ojala puedan ayudarme.

Estoy Haciendo un programita en Excel el cual va a servir para imprimir etiquetas para un inventario, las etiquetas contienen no_parte, ubicación, descripción e imagen, estos datos están almacenados en una BD en Excel, excepto la imagen que esta en una carpeta C:\imágenes(Cada imagen se llaman como el no_de parte)

En el formulario por medio de formulas se mandan llamar los datos dependiendo de que rango de numero a que rango quiero imprimir sin embargo para que me aparezca la imagen no se como hacer.

Anexo código que encontré:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume Next

'If Target.Address = "$B$4" Then

nombre = Target.Value

ActiveSheet.Image1.Picture = LoadPicture("C:\imagenes\" & nombre & ".jpg")

End If

End Sub

B4 es la celda donde aparece el no_parte por medio de esta formula(=VLOOKUP(H3,BASE_DE_DATOS!A2:D5,2))

Anexo archivo también, espero puedan ayudarme!!!

Saludos!!

imagenes.rar

Featured Replies

publicado

.

Las fórmulas y VisualBasic no son precisamente muy amigos, por lo que es preferible no mezclarlos.

Te he hecho un pequeño formulario para seleccionar e imprimir la etiquetas que tu quieras prescindiendo de las fórmulas de la hoja ETIQUETA.

.

Inventario MA.rar

publicado
  • Autor

Muchas gracias Antonio,

Tu formulario esta muy bien, solo una cosa de donde esta tomando la imagen ya que no me la muestra.

Agregue la ruta en el codigo ya que las tengo en "C:\imagenes\" No se que este haciendo mal???

post-178276-145877010601_thumb.jpg

publicado

Yo he supuesto que las imágenes están en el mismo directorio del archivo Excel, si no es así, que es lo que parece, elimina la expresión Thisworkbook.Path &,y te funcionará.

publicado
  • Autor

Me funciono perfecto, justo lo que necesitaba, muchasimasss gracias !!!!!! :)

Archivado

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

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.