¿Cómo copiar una imagen de una hoja de cálculo a un UserForm en Excel?

Este artículo te mostrará métodos para copiar una imagen desde la hoja de cálculo activa al UserForm en Excel.

Copiar imagen de la hoja de cálculo al UserForm con copia y pegado
Copiar imagen de la hoja de cálculo al UserForm con código VBA

Copiar imagen de la hoja de cálculo al UserForm con copia y pegado

Por favor, sigue los siguientes pasos para copiar una imagen de una hoja de cálculo a un UserForm.

1. Cambia a la hoja de cálculo que contiene la imagen que necesitas copiar al UserForm, y luego presiona las teclas Alt + F11 juntas para abrir la ventana de Microsoft Visual Basic for Applications.

2. En la ventana de Microsoft Visual Basic for Applications, haz clic en Insertar > UserForm. Ver captura de pantalla:

3. Ahora inserta un Control de Imagen en el UserForm. Haz clic en el botón Imagen en el cuadro de diálogo de la Caja de Herramientas, luego dibuja manualmente un Control de Imagen en el UserForm. Ver captura de pantalla:

4. Haz clic derecho en el control de Imagen insertado, y selecciona Propiedades desde el menú contextual como se muestra en la siguiente captura de pantalla:

5. Luego verás un panel de Propiedades que aparece en el lado izquierdo de la ventana de Microsoft Visual Basic for Applications.

6. Regresa a la hoja de cálculo y selecciona la imagen que deseas mostrar en el UserForm, y luego copia la imagen presionando las teclas Ctrl + C.

7. Vuelve a la ventana de Microsoft Visual Basic for Applications, desplázate hacia abajo para hacer clic en el campo Imagen y luego pega el nombre de la imagen copiada bajo la pestaña Alfabética.

Ahora la imagen en la hoja de cálculo está copiada en el UserForm.

Descubre la Magia de Excel con Kutools AI

• Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
• Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
• Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
• Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
• Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.

Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!

Copiar imagen de la hoja de cálculo al UserForm con código VBA

Esta sección te mostrará una solución alternativa para copiar múltiples imágenes desde una hoja de cálculo a un UserForm, y luego mostrar la imagen correspondiente en el UserForm seleccionando el nombre de la imagen desde un cuadro combinado. Por favor, sigue los siguientes pasos.

1. Por favor, sigue los pasos 1 y 2 anteriores para insertar un UserForm en tu hoja de cálculo.

2. Luego inserta un Control de Marco en el UserForm como se muestra en la siguiente captura de pantalla:

3. Haz clic derecho en el Marco insertado, y selecciona Propiedades desde el menú contextual. En el panel de Propiedades de la izquierda, selecciona No desde el campo Visible. Ver captura de pantalla:

4. Inserta múltiples controles de Imagen en el Marco como se muestra en la siguiente captura de pantalla.

5. Regresa a la hoja de cálculo y selecciona la imagen que deseas mostrar en el UserForm, y presiona las teclas Ctrl + C para copiarla.

6. Entra nuevamente en la ventana de Microsoft Visual Basic for Applications, haz clic derecho en el primer control de Imagen, y selecciona Propiedades desde el menú contextual. Ver captura de pantalla mostrada.

7. En el panel de Propiedades, haz clic en el campo Imagen, luego presiona las teclas Ctrl + V para pegar la imagen que copiaste en el paso 5, y luego selecciona 1 – fmPictureSizeModeStrtch desde la lista desplegable PictureSizeMode como se muestra en la siguiente captura de pantalla.

8. Repite los pasos 5 - 7 para pegar otras imágenes desde la hoja de cálculo a los controles de Imagen restantes en el UserForm. Y el resultado se mostrará como en la siguiente captura de pantalla.

9. Mueve el control de Marco a la esquina del UserForm, luego inserta un nuevo control de Imagen y un control de Cuadro Combinado en el UserForm. Ver captura de pantalla:

10. Haz clic derecho en el UserForm, y luego haz clic en Ver Código. Luego copia y pega el siguiente código VBA para reemplazar el original en la ventana de Código.

Código VBA1: Copiar imagen de la hoja de cálculo al UserForm

Private Sub ComboBox1_Change()
    UserForm1.Controls.Item("Image4").Picture = UserForm1.Controls.Item(UserForm1.ComboBox1.Value).Picture
End Sub
Private Sub UserForm_Initialize()
    Dim xImg As Control
    On Error Resume Next
    For Each xImg In UserForm1.Controls
        If TypeName(xImg) = "Image" And xImg.Name <> "Image4" Then
            UserForm1.ComboBox1.AddItem xImg.Name
        End If
    Next
End Sub

Nota: En el código, UserForm1 es el nombre del UserForm insertado, Image4 es el nombre del control de Imagen donde se mostrarán las imágenes. E Image representa todos los controles de Imagen que contienen las imágenes que copiaste desde la hoja de cálculo. ComboBox1 es el nombre del cuadro combinado que has insertado en el UserForm. Por favor, cámbialos según corresponda.

11. Cierra la ventana de Microsoft Visual Basic for Applications.

12. Inserta un botón de comando en la hoja de cálculo haciendo clic en Desarrollador > Insertar > Botón de Comando (Control ActiveX).

13. Haz clic derecho en el botón de comando y selecciona Ver Código desde el menú contextual. Luego copia y pega el siguiente código VBA en la ventana de Código. Y finalmente cierra la ventana.

Código VBA2: Copiar imagen de la hoja de cálculo al UserForm

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub

15. Haz clic en Desarrollador > Modo Diseño para desactivar el Modo Diseño.

A partir de ahora, cuando hagas clic en el botón de comando, aparecerá el UserForm. Puedes mostrar la imagen seleccionando el nombre de la imagen desde el cuadro combinado. Ver captura de pantalla:

Seleccionar diferentes nombres desde el cuadro combinado mostrará diferentes imágenes en el UserForm.

Artículos relacionados:

• ¿Cómo centrar una imagen en una celda de Excel?
• ¿Cómo verificar si una celda contiene una imagen en Excel?
• ¿Cómo insertar una imagen o imagen dinámicamente en una celda basada en el valor de la celda en Excel?
• ¿Cómo ampliar una imagen al hacer clic sobre ella en Excel?