Bom dia!! Eu não entendi muito bem... Sub ExpliqueMelhor() Range("H1", Range("H65536").End(xlUp)).AutoFilter 1, &qu...

bruno, conforme as Regras do Forum, todo anexo tem de estar compactado em dos formatos .zip - .rar - .ice e não ultrapassar o tamanho de 2 mb, por is...

De uma olhada nas rotinas que executou ao final de cada uma deve ter a expressão TRUE, se tiver troque por FALSE e rode novamente, se não funcionar, c...

Veja se é isto : Public Sub Verifica() Dim Col As Integer Dim r As Long Dim C As Range Dim N As Long Dim V As Variant Dim Rng ...

Pela falta de mais detalhes, veja se consegue adaptar, a rotina copia as colunas para outra aba, configura a pagina e salva pdf. Sub ExportaColunas_T...

Desmembrado do tópico: viewtopic.php?f=20&t=11597 Sempre crie um novo tópico para as tuas dúvidas, não aproveite tópico dos outros. Patropi - Mo...

Boa tarde LF Seja bem-vinda ao fórum! Baixe a planilha e veja se eu entendi o que desejas. 06_05_15_Gestão de PIS v2_Patropi.zip Se a resposta fo...

luiz, li varias vezes sua postagem e confesso que fiquei confuso, mas enquanto aguardamos o seu modelo conforme orientado pelo Fernando, segue um mode...

Regras do forum: • Upload Devido a ultrapassagem da marca de 1,5Gb de armazenamento de arquivos na hospedagem do Planilhando, limitaremos o tamanho d...

Rui Para inserir o código no teu ficheiro: Premir ALT+F11 --> vai acessar o Editor de VBA do Excel --> Guia Inserir --> Módulo --> no mó...

Regras do forum: • Upload Devido a ultrapassagem da marca de 1,5Gb de armazenamento de arquivos na hospedagem do Planilhando, limitaremos o tamanho d...

Excelente, Fernando! Muito obrigado mesmo!!! Abraço!!!

Rui e Rafael Se o Rui já tivesse anexado o ficheiro na primeira postagem esse problema não teria ocorrido, pois o Rafael iria responder anexando nova...

Boa tarde!! Tente assim. Sub AleVBA_15699() Dim Rng As Range, Ar As Range Set Rng = Range("A2:A" & Cells.Find("*&quo...

Boa tarde!! Veja: