Utilize este código vai proteger Texto e as Formulas. Private Sub Worksheet_Change(ByVal Target As Range) 'Código bloqueia formula e texto Dim rng As ...

li o teu enunciado com mais atenção então fiz algumas alterações, agora quanto as formulas das colunas A, B e C ainda não conseguir resolver mas veja ...

Veja o modelo se lhe atende, só trava texto para travar as formula é preciso usar outro texto no código. REGISTRO2.rar

Desculpe me pela demora fiz algumas modificações no código e deu certo. Obrigado Nelson S.

É porque eu gostaria que esta função fosse disparada automaticamente, pois minha pasta de trabalho tem vários usuários. O disparador já esta pronto fa...

Ótimo isso mesmo que queria, obrigado EDIVAN.

No final do código cole a linha abaixo. ActiveCell.Offset(0, 1).Activate

Não deu certo. Somente quando inserir na coluna M:M então seleciona a ultima linha vazia da coluna A

Resolvido obrigado pela ajuda. Private Sub Workbook_Open() If Range("A1") <> Date Then Call executa_Macro End If End Sub Sub exe...

Obrigado pela dica Renatbr, Se possível poste um modelo descrito acima.

A macro para executar é pesada e demorada, então queria que ela rodasse somente uma vez ao dia no evento workbook open. Todos os dias ao abrir o arqui...

No modelo em anexo envia sem erro no Gmail e Hotmail agora no IBM Notes vc precisa achar os código do provedor. No modelo em anexo abra o editor e cad...