Vc renomeou ou alterou o endereço desse arquivo na mensagem?

Já que na pesquisa do Windows funciona como vc precisa não seria possível inserir a API do Windows que contenha essa função de busca? Não sei como f...

Olá @felipe2269,Vc já tentou usar a função Redim Preserve?Att, Televisaos.

Olá @alanisfcms, Nesse caso eu usaria nas colunas uma fórmula SE concatenada com uma Núm.Caract. Não precisaria de VBA neste caso. A dica ajudou...

Olá @camiloalves01, Veja se este trecho de código te atende: With Worksheets("Registro Pendencia NC") .Range("A7:A500").Find(Worksheets("Inse...

Boa tarde @camiloalves01, Creio que a função PROCV resolva o seu problema sem necessidade de programação VBA. Se não conseguir avise que tentamos um...

Olá @Fabiano, Selecione as duas células anteriores e arraste para o espaço em branco. Att

Olá @SandroLima, Tente este código: volta: For Each cell In ActiveSheet.ListObjects("TB_Procedimentos").ListColumns(1).DataBodyRange....

Olá @de_nise_, Acho que não tem como. A única forma que consegui pensar foi de alguma forma acessar o histórico do "Desfazer", vulgo ctrl+z, mas não...

Olá, @sandrolima Minha sugestão seria vc filtrar a tabela origem, organizar por mês e depois tentar adaptar o código do seguinte item para copiar o...

E o arquivo ou o exemplo?

Olá @denisonreis , Não entendi exatamente o seu problema mas observando o código que vc postou notei que a variável "FornecedOr" está escrita de mod...

Olá @jau288, Na célula G5 substitua a fórmula por =SE((20000-D40)<0;"Menos "&PRI.MAIÚSCULA(extenso_valor(-G3));PRI.MAIÚSCULA(extenso_valor(...

Olá @diasbh , Veja se este código resolve seu problema: Sub transpor_coluna() Dim ultimalinha As Integer Dim primeiracoluna As Integer Di...

Boa tarde, Sou leigo em tabela dinâmica mas ela não resolveria teu problema? Att