Boa tarde!! Um raciocínio séria.. Copiar até a ultima linha da guia origem e colar na ultima linha da guia destino! Sub Copiar() Dim lr As Long ...

Marcway Fundi teus 2 tópicos, pois se referem a mesma dúvida. Nunca crie 2 tópico sobre o mesmo assunto. Quando o tópico já estiver trancado e você n...

Bom dia!! Segue minha forma de solução! Att

Selmo, de uma olhada nos tópicos abaixo referente a Adicionar Bibliotecas, só prrecisa verfificar quanto à compatibilidade das versões que citou : Aba...

Ops!!! . B1=SE(ÉTEXTO(A1);(ESQUERDA(A1;2)&":"&DIREITA(A1;2))*1;VALOR(A1)) . PS: como no trabalho não consegui resolver, já cheguei p...

A1=25:35 ou A1=0,833333 ... B1 =valor(a1) . Isto resolve quando a coluna A está nestes formatos acima!!! . Mas quando está no formato texto (2535, 23...

Boa noite will_ms Eu fiz outra tabela, que retorna #N/D se a célula estiver em branco, para evitar que a linha do gráfico desça até zero. Baixe a pl...

Boa noite Agora só falta você clicar na mãozinha, que fica do lado da ferramenta Citar, para agradecer ao Murilo []s

Boa tarde!! Porque que seus dados não podem ser organizados, conforma meu modelo que eu fiz, do outro post? Att

Boa tarde!! Não testado!! Sub naoTestado() Dim wkbCrntWorkBook As Workbook Dim wkbSourceBook As Workbook Dim rngSourceRange As R...

Boa tarde!! Porque segundo seu raciocínio de deslocar a coluna, as colunas E,F,G, não tem dados!!!! faça você os ajustes!!! Att

Boa tarde!! Veja se ajuda!! Att

Reinaldo, obrigado pela ajuda, parece que nesse tópico tem a solução... só estou com um pouco de dificuldade pra interpretar a propriedade ".tag&...

Boa tarde!! Então tente.. AleVBA_13655V2() Dim MyArray As Range, cell As Range Dim WS As Worksheet Dim sList As String Set WS = Sheets("Plan1&...