Vc. também poderia usar uma função personalizada para isso. Num módulo normal, insira o seguinte código: Dim rgx As Object Const ER = "^[^1...

Bom dia, Rochenfels Foi algum engano (erro ao copiar) ou está normal somente a célula A1 da primeira coluna não ter trazido a numeração "NNNN / ...

Bem vindo ao Planilhando, Rochenfels Por gentileza, anexe um arquivo Excel (compactado) aqui com pelo menos algumas linhas para verificarmos como est...

Putz, só agora vi que este tópico é de fevereiro de 2017!

Mais uma, por fórmula: =MÁXIMO(SEERRO(LOCALIZAR("R";A1;LIN(INDIRETO("1:"&NÚM.CARACT(A1))));"")) É matric...

=CÉL("endereço";G25) mostra $G$25 e pq =CÉL("endereço";G25:K30) não mostra $G$25:$K$30 ? De fato essa função CÉL e também a END...

Boa tarde, Colegas... Lembro de ter ouvido em uma Live de uma entrevista com nosso MVP brasileiro, o João B. Savastano, ele comentando exatamente iss...

Boa noite, Francisco Uma maneira simples de fazer seria: Insira a seguinte fórmula na célula B1: =ARRUMAR(EXT.TEXTO(A1;COL(1:15)*3-2;3))[/*:m:1bhrd7...

Bom dia, amigos É o caractere de código ascII 09 (tabulação horizontal) que vcs devem localizar e substituir. Pode não parecer, mas na verdade ele n...

Boa tarde, colega Leandro Dá uma olhada na demanda do colega @Salezzi no tópico Vários tratamento de erros em um único código, bem semelhante à sua. ...

Valeu, colega André... embora o código tenha que ficar em loop infinito mas funciona mesmo! Se quiser reduzir um pouco a carga de processamento contí...

Bom dia, lcamargo Faltou o espaço em branco antes e depois do & comercial. Faltou também finalizar a macro com End Sub

Tentei Range("Name1, Name2, Name3").Cells(deslocLin, deslocCol) = Valor e só Name1 recebeu o valor. Como vc quer Deslocamento, use Offset ao...

Range("Name").Columns("A:B").Copy Range("A1").PasteSpecial xlPasteValues

Xi, meu amigo xlarruda, acho que não vai rolar isso que vc quer. O problema é que a ocultação ou alteração da largura/altura de coluna/linha além de ...