Botão de Navegação em Subformulário não funciona

Boa Tarde amigos!

Tenho um formulário PAI e um subformulário relacionados pelos campos nota_fiscal, cnpj.
Bom... No formulário principal eu entro com os dados da Tabela , então vou para o subformulário digitar e gravar os .
Eu personalizei os meus botões de navegação, e apesar de o sistema estar gravando os itens, quando eu clico nos botões IrParaProximo ou IrParaAnterior aparece uma mensagem dizendo "Você não pode ir para o Registro " Detalhe: EU JÁ INSERI VÁRIOS ITENS".

Então para teste eu habilitei os botões de navegação do Access para eu ver se conseguia navegar por eles... E qualquer botão que eu clique o sistema diz que "Eu estou tentando  inserir campos nulos a chave primária"

Quem puder me ajudar....
Estou aceitando sugestões!!!


Excelente tarde a todos!

Karenzinha

Olá...parece obvio mas vc verificou os relacionamentos das tabelas?
Quando vc inseri dados no form_Pai o subform permite vc inputar dados ou é somente os botões de navegação que estão não estão deixando vc navegar?

Só os botões de navegação que não funcionam no subformulário.
Revisei o relacionamento, os campos estão assim associados:

Tabela Pai: Formulário Principal

NOTAS
 nota_fiscal  (Chave Primaria)
 cnpj           (Chave Primaria)
 data_nota_ped


Tabela Filho: Subformulário

PEDIDOS
 cod_item (Chave Primária)
 NIP         (Chave Secundária)  Vem de uma outra tabela CLIENTES
 nota_fiscal (Chave Secundária) Vem da tabela NOTAS
 cnpj  (Chave Secundária) Vem da tabela NOTAS
 desc_item
 uf
 qtd
 v_unit
 tipo_nota

Eu tenho um procedimento do botão salvar no subformulário que esta da seguinte forma e funciona perfeitamente:
O meu problema é que mesmo inserindo os dados na tabela, os botões de navegações não vão nem para trás, nem para frente...

     Select Case Forms![Cadastro do Dia]!Quadro40
        Case 1
           Tipo_nota = 1
        Case 2
           Tipo_nota = 2
     End Select
     
     
     inserir_pedido = "INSERT INTO [PEDIDOS]([nip],[nota_fiscal],[cnpj],[item],[uf],[qtd],[valor unitario],[valor total],[data_lanc],[tipo])" _
                   & "VALUES ('" & Forms![Cadastro do Dia]![cod_nip] & "', '" & Forms![Cadastro do Dia]![Texto8] & "', '" & Forms![Cadastro do  Dia]![Combinação14] & "','" & Me.ITEM & "','" & Me.UF & "', '" & Me.QTD & "', '" & Me.VALOR_UNITARIO & "', '" & Me.VALOR_TOTAL & "', '" & Forms![Cadastro do Dia]![Texto28] & "', '" & Tipo_nota & "');"
     
     CurrentDb.Execute inserir_pedido
     
     MsgBox ("Registro Salvo com Sucesso!")
     
     Me.Texto20.SetFocus
     Me.Texto20 = Forms![Cadastro do Dia]![cod_nip]
     Me.Texto22.SetFocus
     Me.Texto22 = Forms![Cadastro do Dia]![Texto8]
     Me.Texto24.SetFocus
     Me.Texto24 = Forms![Cadastro do Dia]![Combinação14]