Seria assim: Sub Macro2() For Each sh In ActiveSheet.Shapes MsgBox sh.Name 'Ver nome da imagem ActiveSheet.Shapes.Range(Array(sh.Name)).Selec...

Veja em viewtopic.php?f=20&t=18499&hilit=+%2Aimage%2A se lhe auxilia

Seria algo +/- assim: For i = 1 To contagem 'preciso colocar um if aqui pra que somente haja a atribuição se o valor for diferente de #N/D If Applicat...

Não sei se entendi, mas experimente: Acrescente a linha: wrksheet.Cells(i + 2, "G") = NUMREG logo após SOMANDOTUDO = wrksheet.Cells(1, 5).Va...

Bom dia ponibia Seja bem-vindo(a) ao fórum! Como você é novo no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos ...

Nessa situação a rotina interrompe por ter "chegado" ao fim da range determinada. Experimente na definição da variavel lr acrecescendo duas ...

ALGUEM PODE ME AJUDAR?

Bom dia wessley, Vê se ajuda: Option Explicit Public Sub Busca() Dim wsIndex As Worksheet Dim UltL As Long Dim Lin As Long Dim i ...

Bom dia Andre Dê uma olhada no tutorial do link abaixo:

Boa noite Júnia Experimente usar a formula: Normalmente as pessoas digitam manualmente na planilha o resultado esperado para cada código, para possi...

Experimente: =CONCATENAR(TEXTO(C3;"7521 0000000");D3;TEXTO(E3;"0000000000000000000,00");F3)

entao adapte o código para remover o filtro, executar e colocar o filtro novamente... grave a macro da inclusão e remoção do filtro, para saber como ...

- Procure no Google e baixe e instale um programa que chama Custom UI Editor - faça uma cópia do seu arquivo, só por segurança - use este programa par...

Boa tarde Ivanildo Seja bem-vindo ao fórum! Movi teu tópico para o local correto, Fórmulas e Funções, pois onde você havia postado, não é permitido ...