Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como verificar se uma célula contém imagem no Excel?

É fácil encontrar e selecionar todas as imagens em uma planilha ativa no Excel. Mas você sabe como verificar se uma célula contém uma imagem no Excel? Um método neste artigo pode ajudá-lo.

Verifique se uma célula contém imagem com código VBA


Verifique se uma célula contém imagem com código VBA


O código VBA abaixo pode ajudá-lo a verificar se uma célula contém uma imagem. Faça o seguinte.

1. Abra a planilha que você precisa para verificar se a imagem existente em uma célula especificada e, em seguida, pressione a tecla outro + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie e cole o código VBA na janela Código.

Código VBA: verifique se uma célula contém imagem no 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. aperte o F5 chave para executar o código. Na aparência Kutools for Excel caixa de diálogo, insira a célula que deseja verificar se contiver uma imagem e, em seguida, clique no botão OK botão. Ver captura de tela:

4. Em seguida, uma caixa de diálogo aparecerá como abaixo a captura de tela mostrada se uma imagem existe ou não na célula especificada.


Artigos relacionados:



Ferramentas de produtividade recomendadas para o Excel

Kutools for Excel ajuda você a concluir o trabalho antes do tempo e se destacar da multidão

  • Mais do que poderosos recursos avançados do 300, projetados para cenários de trabalho 1500, aumentando a produtividade em 70%, você tem mais tempo para cuidar da família e aproveitar a vida.
  • Não precisa mais memorizar fórmulas e códigos VBA, dê um descanso a seu cérebro a partir de agora.
  • Torne-se um especialista em Excel em minutos 3, operações complicadas e repetidas podem ser feitas em segundos,
  • Reduza milhares de operações de teclado e mouse todos os dias, diga adeus às doenças ocupacionais agora.
  • 110,000 pessoas altamente eficazes e escolha de empresas de renome mundial 300 +.
  • 60-day full features versão de avaliação gratuita. Garantias de devolução do dinheiro 60. 2 anos de atualização e suporte gratuitos.

Traz navegação com guias e edição para o Microsoft Office, muito mais poderosa do que as guias do navegador

  • A guia Office foi projetada para Word, Excel, PowerPoint e outros aplicativos do Office: Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
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.