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 verificar si una celda contiene una imagen en Excel?

Es fácil encontrar y seleccionar todas las imágenes en una hoja de trabajo activa en Excel. ¿Pero sabes cómo verificar si una celda contiene una imagen en Excel? Un método en este artículo puede ayudarte.

Verificar si una celda contiene una imagen con código VBA


Verificar si una celda contiene una imagen con código VBA


El siguiente código de VBA puede ayudarlo a verificar si una celda contiene una imagen. Por favor haz lo siguiente.

1. Abra la hoja de trabajo que necesita para verificar si la imagen existe en una celda especificada, luego presione otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo. Luego copie y pegue el código VBA en la ventana Código.

Código de VBA: compruebe si una celda contiene una imagen en Excel

Sub CellHasPicture()
    Dim xRg As Range
    Dim xShape As Shape
    Dim xFlag As Boolean
    On Error Resume Next
    Set xRg = Application.InputBox("Please enter the cell address:", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xFlag = False
    For Each xShape In ActiveSheet.Shapes
        If xShape.TopLeftCell.Address = xRg.Address Then
            xFlag = True
        End If
    Next
    If xFlag Then
        MsgBox "Image exists!"
    Else
        MsgBox "Image does not exist"
    End If
End Sub

3. presione el F5 clave para ejecutar el código. En el apareciendo Kutools for Excel cuadro de diálogo, ingrese la celda que desea verificar si contiene una imagen y luego haga clic en OK botón. Ver captura de pantalla:

4. Luego aparecerá un cuadro de diálogo como la siguiente captura de pantalla que se muestra si existe una imagen o no en la celda especificada.


Artículos relacionados:



Herramientas de productividad recomendadas para Excel

Kutools para Excel lo ayuda a terminar el trabajo antes de tiempo y sobresalir de la multitud

  • Más que las potentes funciones avanzadas de 300, diseñadas para los escenarios de trabajo 1500, aumentando la productividad en un 70%, le dan más tiempo para cuidar de la familia y disfrutar de la vida.
  • Ya no es necesario memorizar fórmulas y códigos de VBA, dale un descanso a tu cerebro de ahora en adelante.
  • Conviértase en un experto en Excel en minutos 3. Las operaciones complicadas y repetidas se pueden realizar en segundos.
  • Reduzca miles de operaciones de teclado y mouse todos los días, despídase ahora de las enfermedades profesionales.
  • 110,000 personas altamente efectivas y 300 + elección de compañías de renombre mundial.
  • 60-day completo de prueba gratuita de características. Garantías de devolución del dinero de 60-day. 2 años de actualización y soporte gratis.

Trae la navegación y edición con pestañas a Microsoft Office, mucho más poderosa que las pestañas del navegador

  • La pestaña Office está diseñada para Word, Excel, PowerPoint y otras aplicaciones de Office: Publisher, Access, Visio y Project.
  • 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!
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.