cadastrar campo através de caixa texto do formulário

Olá amigos do forúm,
Estou precisando de novo da ajuda de vocês...tenho um formulário de pesquisa ,com a caixa de combinação “isométricos” eu escolho um isométrico e aparece que sop e que pasta este
Isométrico pertence, eu quero que quando for fazer a pesquisa digite OK na caixa texto status e ele apareça no campo STATUS da planilha iso.
Tentei usar um código que um amigo me indicou mas não funcionou ele apararecia como registro novo
Desde já agradeço .

Olá SAMIA,

Modifique o código no seu formulário:

Private Sub colol_AfterUpdate()
Me.ultima.Value = Me.colol.Column(1)
Me.PROXIMA.Value = Me.colol.Column(2)

'Código de Eduardo Machado (Good Guy)
If Not IsNull(ultima) And Not IsNull(PROXIMA) Then
Me.statu = "OK"
Dim Atualiza As String
Dim strProcura As String
Dim sStatus As String
sStatus = colol.Column(0)
strProcura = DLookup("Código", "iso", "SPI= '" & sStatus & "'")
Atualiza = "UPDATE ISO SET STATUS = 'OK' WHERE CÓDIGO = " & strProcura
CurrentDb.Execute Atualiza
Else
Exit Sub
End If
End Sub

Bom dia,

Eu coloquei o seu código no meu formulário a princípio parecia que funcionava bem...porém percebi que ele mudava o sop e o sth na tabela iso,isso acontece sempre com o primeiro registro...com o restante não...

Olá Samia,

Não constatei através de testes o que você afirma. Pode me esclarecer melhor o que está acontecendo? Vou postar o aplicativo com minha modificações e você faz os testes aí e veja o que realmente precisa mudar. OK?

Estou te enviando o formulário com o erro na tabela "iso" o primeiro registro era um registro válido, olha como ele está, percebi que o erro aparece quando você pega o registro que já colocou como "OK" e faz de novo, mas na ora de cadastrar pode acontecer...

Eu estive analisando o erro não é na tua formula...porque eu tirei a formula coloque novamente o registro na tabela salvei fechei o banco de dados abri novamente e lá estava o registro diferente o sop e a pasta eram outros...só acontece no primeiro registro...ele fica com a informação da minha ultima pesquisa.

Olá Samia,

O primeiro registro contém caracteres chineses. É isso mesmo? Deletei o primeiro registro. Testei da maneira como você afirmou e nada aconteceu de errado. Observei que o campo STATUS pode ser OK ou FALTA. Mas muitos registros estão em branco. Quer ajuda para atualizar os campos em branco e deixar como FALTA ou modificar o código para deixar uma ou outra informação a cada seleção?

Olá amigo,

eu tornei a baixar o formulário e agora está rodando certo,não sei porque apareceu aqueles caracteres chineses no outro...estava pensando acho que teria que aparecer as duas opçoes mesmo...porque um isometrico pode estar status OK quando subir a revisão ele volta para falta até chegar a revisão certa...

Olá Samia,

Valew pelo retorno. Por favor, poste então como resolvido. O fórum todo agradece.

olá amigo,

Tenho outro formulário,teria como você me ajudar novamente? é a mesma lógica do outro só que com caixas de combinação...
Desculpe a demora nas respostas fim de ano é correria na empresa onde trabalho...

Olá Samia,

Qual o algoritmo deste programa? Descreva pra mim o que ele deve fazer.

Boa tarde,

eu escolho as opções nas caixas de combinação e clico em incluir os dados vão para tabela andamento, mas queria que o botao editar funcione da seguinte maneira caso troque as opçoes de um registro já cadastrado na tabela andamento atraves do botao incluir ele troque as informações existentes sem criar um novo registro ele edite o registro existente.

agradeço.

Olá Samia,

Como você demorou a responder não puder dar a devida atenção ao tópico. Amanhã vou analisar com cuidado e te dou um retorno.