Amigo, veja se eu entendi direito. Eu usei uma fórmula matricial para retornar a data. Porém, mesmo estando correta, pode te dar problemas. A planilh...

Talvez assim? Uma_possibilidade_GT.zip

E onde estão seus dados? Nota: as regras do fórum dizem que os anexos devem ser compactados e o seu não está.

Com a planilha ficou mais fácil entender. Use o código assim, acho que tem o que vc quer: Private Sub Worksheet_Change(ByVal Target As Range) Applic...

Todos estes casos em amarelo estão fora do padrão que vc apontou no primeiro post: Como se fosse assim: SE (A2 = PRODUTO1; ENTÃO B2 DEVE ESTAR NO FOR...

essa pagina até parece ter a resposta , mas eu olho aquele monte de numero e embaralha tudo

ta, mas, pq vc simplesmente nao faz o loop? Function Divisores_GT(num As Long) As String Dim i As Long Dim retorno As String retorno = 1 For i = 2 ...

Mais fácil que lopar com mod e não conheço, mas... segue uma matricial que lista os divisores, considerando qe o número esteja em A1, coloque a fórmul...

Tem razão, não sei onde eu estava com a cabeça. Veja agora: Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = Fa...

Comece anexando um exemplo da planilha, vai facilitar pra gente e pra vc, pode ser?

Ok, veja se é assim. REGRA PARA CORREÇÃO - EXCEL ENVIO_GT.zip

Clica com o botão direito na barra de status do rodapé e marca a opção "contagem".

ok

Coloque esta fórmula em C2 e arraste. =SE(B2="";"";SE(OU(E(NÚM.CARACT(B2)=10;NÃO(ÉNÚM(--ESQUERDA(B2;1)));ÉNÚM(--EXT.TEXTO(B2;2;3)...

Em E5: =SEERRO(SE(OU(E$3=$C5;E(E$3>=$C5;MOD(E$3-$C5;$D5)=0));"X";"");"") arraste para a direita e para baixo. Depo...