Bom dia!!! seria complicado fazer isso sem os dados em um arquivo modelo!

Tem sim, mas vc que havia pedido pra rodar em todas. Agora vc quer que rode somente na atual, é isso? Aqui está: Sub arrumar() Dim sht As Worksheet ...

Tenta assim: Sub arrumar() Dim sht As Worksheet For Each sht In ThisWorkbook.Worksheets sht.Select Selection.Curr...

Agora vai: Sub InsereLinha() Dim UltimaLinha As Long UltimaLinha = ActiveCell.Row Range("A" & Ul...

1) Sempre lembre de compactar seus anexos (regras do forum) 2) Coloque em C2 e arraste para baixo: =SE(B2="";C1;B2) p.s.: Outra que tb func...

Ok, a função que eu criei tem esse código (mesmo código que postei ao final do tópico sugerido pelo Alex): Option Explicit Public Function Elemento(B...

Bom dia!! Mas pela imagem você quer manipular um objeto de propriedade da ferramenta, poste seu arquivo modelo!! Att

Bom dia!! Leia em: viewtopic.php?f=10&t=15220&p=78786 Att

Vc topa usar UDF, função VBA para quebrar conteúdo ? Eu criei uma função outro dia, chamei de elemento... Pra pegar o enésimo item de uma célula, queb...

Bom dia!! Você quer listar em ordem alfabética a Lista de campos da tabela Dinâmica? Se poder explicar melhor. Att

Vc criou uma UDF , ok, mas eu sempre digo, tem que tomar cuidado... vc está passando como parâmetro, o intervalo: Consolidado!A:F Esse intervalo são ...

Boa noite Mena Para facilitar anexe um exemplo da tua planilha demonstrando o resultado esperado. []s

Boa noite Claudir Nas fórmulas temos a condição Verdadeira e falsa, e você só colocou as verdadeiras, por isso retornou falso. Experimente assim: =...

Boa tarde sid Para facilitar anexe um exemplo da tua planilha, demonstrando manualmente o resultado esperado []s

É exatamente isso. 1000 joinhas, Patropi. Grato, Pedro