VBA para rodar com "edição da célula" ativa!

Oi! Como posso fazer, no vba, e sem a utilização de caixas de texto, para quando estiver digitando valores em uma célula e ela chegar no 4ª caractere, executar um comando que de ENTER automaticamente? Eu só consigo fazer quando a célula está ativa (após ENTER manual), mas não consigo fazer quando a edição da célula está ativa, em “tempo real”.
Edição ativa