Liberando insersão de dados no frm com botão novo

Olá amigos,
Gostaria de saber se é possivel deixar o frm com os campos inativos e só liberá-los após clicar no botão novo para então fazer o referido cadastro.
Obs: o projeto está sendo construído no access 2007.
Desde já, agradeço a todos os participantes do forum.

Olá! Dê uma pesquisada na ajuda do vba por AllowAdditions, AllowEditions, etc. Para ver outras possibilidades, digite Me.Allow em uma linha no vba e veja as dependências que começam com Allow.

Olá amigo,
Poderia ser mais claro, é que sou novo nesse ramo e tenho minhas limitações.
Poderia me mandar algum ex
Agradeço,

Abra seu formulário no modo Design. Veja na tabela de propriedades do formulário, na aba Eventos, tem a linha "Ao carregar". Na frente dessa linha, no final dela, tem reticências ou três pontinhos(...). Clique nesses três pontinhos. Abrirá uma caixa de diálogo com três opções. Clique na última opção para abrir o vba. Digite a linha abaixo:

Me.AllowAdditions = False

Faça a mesma coisa para o evento "Após atualizar".

Clique no botão e, no evento "Ao clicar" dele, clique nas reticências, escolha a última opção novamente e digite:

Me.AllowAdditions = True

Ainda no botão, vá nas propriedades dele, aba "Outra", linha "Parada de tabulação" e coloque "Não".

Olá amigo,
Fiz o que me mandou e não deu certo, alguma outra dica.
obrigado.

Olá

Primeiro você cria um botão e coloca a seguinte expressão para desactivar o campo

Private Sub nomedobotão_Click()

nomedocampo.enabled = false
End Sub



depois você cria outra botão e coloca a seguinte expressão para activar o campo

Private Sub nomedobotão_Click()

nomedocampo.enabled = True


End Sub

Esqueci de referir que se quiseres abrir o formulário com os campos desactivados tens de colocar a seguinte expressão.

Private Sub nomedoformulário_Open(Cancel As Integer)
nomedocampo.enabled = false
End Sub

Olá

A opção oferecida pelo Criquio (valdino) e bem prática. Só que a minha sugestão é usar o evento "No atual" do formulário, para desabilitar a adição.

Private Sub Form_Current()
Me.AllowAdditions = False
End Sub

e para o seu botão novo registro, use no evento "Ao clicar"

Private Sub NomeDoSeuBotão_Click()
DoCmd.GoToRecord , , acNewRec
Me.AllowAdditions = true
me!NomeDeUmcampo.setfocus
End Sub

Sucesso!