[Resolvido]Adaptar Código para mudança da cor da linha em formulário contínuo

Olá amigos!

Bd em access 2007.

Tenho um subformulário no formato contínuo com uma caixa de seleção de nome "Status".

Pesquisando no Fórum encontrei o código abaixo e o adaptei para que quando o "Status" for marcado, a linha fique azul. O código funciona, porém ao fechar o formulário, o sistema sempre pergunta: "Salvar as alterações feitas nestes objetos? Daí abaixo aparecem os nomes do Formulário e do subformulário e as opções "Sim" "Não para todos" "Cancelar".

O que posso fazer para que essa mensagem não apareça?

Desde já, agradeço!

Private Sub Detalhe_Paint()
'Alterando cor da faixa
'----------------------------------

If Me.Status = True Then
'---------------------------------------------------
'Pinta tanto a faixa alternativa como a faixa normal
'---------------------------------------------------
Me.Detalhe.AlternateBackColor = RGB(132, 161, 198) ' azul
Me.Detalhe.BackColor = RGB(132, 161, 198) 'azul
Else

Me.Detalhe.BackColor = RGB(255, 255, 255) 'Branco
Me.Detalhe.AlternateBackColor = RGB(236, 236, 236) 'cinza claro
End If

End Sub

Você pode desabilitar o botão de fechar padrão do formulário e colocar um próprio com evento ao clicar abaixo:

DoCmd.Close , , acSaveNo
' ou acSaveYes se quiser que salve sem perguntar.

Olá Criquio!

Obrigado funcionou. Porém ao excluir a linha, o sistema emite a seguinte mensagem:

Erro em tempo de execução '2424'.
A expressão que você inseriu possui um nome de campo,controle ou propriedade que o "Nome do Bd" não pode localizar.

Ao clicar em depurar fica marcado de amarelo na linha: If Me.Status = True Then

Alguma sugestão do que pode ser isso?

Outra questão: existe uma outra maneira de mudar a cor da linha sem utilizar o apção "Ao Pintar"? Se não da linha, então dos campos que compõe essa linha. O importante é que ao marcar essa opção "Status" ela fique em destaque.
Aumentando o nível da questão, existe uma maneira de que também, se a opção "Status" estiver marcada, não seja possível editar ou alterar os demais campo dessa linha?(Com exceção do próprio campo "Status" que poderá ser desmarcado.)

Desde já agradeço!

Formatação condicional é o mais simples para resolver esse seu problema.

Pesquisei no Forum e não encontrei nenhum exemplo de formatação condicional que se encaixasse para meu caso.

Como é um subformulário no modo contínuo, onde e como esse tipo de formatação deve ser inserida?

Como ficaria, por exemplo, para que a linha ou todos os campos dessa linha ficassem azuis se o campo "Status" fosse selecionado?

Veja o simples;

Obrigado JPaulo, funcionou perfeitamente.

Como citei anteriormente, tb gostaria que ao marcar o campo "Status" os demais campos não mais poderiam ser editados.

Fiz da seguinte maneira porém não funcionou: Coloquei o código abaixo no evento "após atualizar" do campo "Status". Será esse o problema, e o código estaria correto?

Está acontecendo o seguinte: Quando clico no Campo "Status" os demais campos das outras linhas ficam inativos, mas o da linha atual, onde o Status foi marcado, não fica. Observei tb que ao fechar e abrir o formulario, os campos que estavam inativos, já não estavam mais. O ideal seria que, uma vez marcada a opção Status, esses campos ficassem sempre inativos. Isso é possível?

If Me.Status = True Then

Me.Texto.Enabled = False
Me.Texto1.Enabled = False
Me.Texto2.Enabled = False

Else

Me.Texto.Enabled = True
Me.Texto1.Enabled = True
Me.Texto2.Enabled = True

End If


Obrigado!

Esquencendo um pouco a estetica na pintura das linhas, a formatação condicional faz o que pretende;

Muito bom JPaulo!

Mais uma vez obrigado!

Obrigado pelo retorno o forum agradece.