. Ufa!!! ... Achei uma solução ... B1 =SE(ÉERROS(CORRESP(EXT.TEXTO(A1;4;1)*1;{1;2;3;4;5;6;7;8;9;0};0));A1;A1+ÍNDICE({-0,01;-0,02;0,02;0,01;0;-0,01;-0,...

. deciog, acho que não é isto que ele quer não!! ... Ele quer é eliminar a fórmula com INDIRETO, já que deixou a plan muito pesada!! ... Mas que a nov...

Boa tarde No link abaixo o problema é no botão direito do mouse, mas eu já usei esse procedimento para outros problemas que tive no Excel e voltou a ...

Squat Pelo jeito você não sabe como marcar corretamente o tópico como Resolvido, e nem como agradecer (pontuar) os colaboradores. Eu editei o tópico ...

Boa tarde!! Eu sugiro que poste seu arquivo modelo(com o código)! Att

Me parece que a proposta do colega Skulden tambem não considera a hora. Considerando essa proposta pode ser utilizada assim: =DATA.VALOR(EXT....

Boa tarde!! Tente assim. Sub AleVBA_26522() Dim rRange As Range Set rRange = Range("A1", Range("A65536").End(xlUp)) With...

Boa tarde!! Use uma formula via VBA. Não testado!! Sub AleVBA_26522() Dim rRange As Range Set rRange = Range("A1", Range("A65536"...

Não sei se entendi corretamente, mas experimete

Bom dia Luiz.P Como você novato no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo: viewtopic.php?f=...

Bom dia!! Tente assim.. Sub NovaPastaSemFormulas() Dim CurrentSheet As Worksheet Application.ScreenUpdating = False 'Nome na Planilha Ativa...

Arthur, se aparece a mensagem é porque encontrou a coluna com o nome indicado "cód. Clie", e ao encontrar sai do Loop. Mas para dar uma res...

Boa tarde. Novidade com relação a este assunto. Leia:

Bom dia!! Consulte a nossa base.