Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo insertar una imagen en el cuadro de texto?

De forma predeterminada, podemos insertar una imagen o imagen en una hoja de trabajo tan rápido utilizando la función Insertar, pero esta función no se aplica para insertar una imagen en un cuadro de texto. Con este artículo, puedo ayudarte a insertar una imagen en un cuadro de texto cuando lo necesites.

Inserta una imagen o imagen en un cuadro de texto con código VBA


flecha azul burbuja derecha Inserta una imagen o imagen en un cuadro de texto con código VBA


Para insertar una imagen en un cuadro de texto, el siguiente código VBA puede ayudarlo, haga lo siguiente:

1. Insertar un cuadro de texto haciendo clic recuadro > Cuadro de texto, y luego dibujar un cuadro de texto, ver captura de pantalla:

doc insertar imagen en el cuadro de texto 1

2. A continuación, mantenga presionada la tecla ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

3. Hacer clic recuadro > Móduloy pegue el siguiente código en Módulo Ventana.

Código de VBA: inserte una imagen en el cuadro de texto:

Sub ShapePicture()
    Dim xSh As Shape
    Dim xPic As IPictureDisp
    Dim xFileName As String
    xFileName = "C:\Users\DT168\Desktop\pictures\Apple.JPG"
    Set xPic = LoadPicture(xFileName)
    Set xSh = Sheets("Sheet4").Shapes(1)
    xSh.Height = xPic.Height / xPic.Width * xSh.Width
    Set xPic = LoadPicture("")
    Set xPic = Nothing
    xSh.Fill.UserPicture xFileName
End Sub

Nota: En el código anterior, Sheet4 es el nombre de la hoja que contiene el cuadro de texto que desea insertar la imagen, y C: \ Users \ DT168 \ Desktop \ pictures \ Apple.JPG es la ruta de la imagen que desea insertar, debe cambiarla según sus necesidades.

4. Y luego presione F5 Para ejecutar este código, la imagen específica se insertará en el cuadro de texto de una vez, y puede editar el cuadro de texto como lo necesite, vea la captura de pantalla:

doc insertar imagen en el cuadro de texto 2


Artículos relacionados:

¿Cómo establecer un valor predeterminado en un cuadro de texto?

¿Cómo permitir que solo se ingresen números en el cuadro de texto?

¿Cómo aplicar el corrector ortográfico en el cuadro de texto?

¿Cómo cambiar el color del cuadro de texto en función del valor en Excel?


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Más de potentes funciones de 300. Funciona con Office 2007-2019 y 365. Soporta todos los idiomas. Fácil despliegue en compañía. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.