Boa tarde Bracinho, Você utiliza "set" no início de alguns códigos? Se utiliza, tenta matar esses "set's" no final do código. Ex...

Boa tarde!! Mude os objetos para Nothing

Bom dia, Segue minha contribuição: =ARRUMAR(EXT.TEXTO(A1;1;PROCURAR("*";A1)-1)) Qualquer coisa da o grito. Abraço

Bom dia Para facilitar anexe uma planilha de exemplo, demonstrando manualmente o resultado esperado. []s

Bom dia!! Tente isso =EXT.TEXTO(C2;LOCALIZAR("GAT";C2);3) Att

Bom dia!! Use uma MsgBox para verificar a execução, nos meus testes eu não tive problemas!!! Private Sub Workbook_Open() 'Insira dentro de um módulo...

Bom dia!! O problema é que eu não uso OutLook, por isso não posso testar, mas qual o link ou parte do post que faz exatamente o que você quer? Att

Bom dia!! Considerando que os dados estão nas coluans A,B,C e o pedido em E2, em F2, use a formula matricial. (formate essa célula com data) Tente =M...

Bom dia!! Essa parte deveria fazer isso: Now + TimeValue("00:00:05") Att

Bom dia!! Pedro, sua ...........Questão está sendo respondida em:

Bom dia!! Você deseja salvar os dados digitado na Plan1 na Plan2? Att

Bom dia!! Não entendi muito bem, após abrir seu arquivo a rotina para ? Private Sub Workbook_Open() 'Insira dentro de um módulo EstaPasta_de_trabalho...

Bom dia!! Oque você pretende fazer, mudar o valor de um intervalo ou célula? Att

Bom dia!! Tente.. Sub AleVBA_17824() With Columns(2) Set c = .Find("DATA ENTRADA", LookIn:=xlValues, lookat:=xlPart, searc...

Bom dia!! Tente.. Sub AleVBA_17824() With Columns(2) Set c = .Find("DATA ENTRADA", LookIn:=xlValues, lookat:=xlPart, searc...