há, outra coisa, gostaria que o botão Inserir só ficasse ativo se tiver algum dados no txtNome, tentei isso não deu certo...

if txtNome.text="" then
commandbutton1.enabled=false
end if

A primeira questão, não pude analizar pois não tenho a versão 2007, e dependeria de ver qual rotina já está utilizando e como estão dispostos os dados na PlanCadastro , mas na segunda utilize a seguinte sintase:

If txtNome.Text <> "" Then
    CommandButton1.Enabled = True
Else
    CommandButton1.Enabled = False
End If

[]s

alienxmam, envie-me um e-mail e lhe mando uma planilha já pronta.
Fica apenas o compromisso de você testar, e quando estiver tudo OK postar a mesma aqui.
Meu e-mail: [email protected]

Conforme o autor do post, o arquivo funcionou perfeitamente.
Portanto, disponibilizo o mesmo para outros que o queiram estudar.
Ele não é perfeito e nem sou expert no assunto.
É certo que muitos conseguiriam fazê-lo melhor do que eu, com um código mais limpo.

A senha para a planilha Cadastro é 123.
Evidentemente se trocá-la, é preciso mudar no código para não dar pau.
A planilha AJUDA deve ficar oculta.