[Resolvido]Validar Campos Sim/Não

Boa tarde

Tenho um formulario que possue 6 campos Sim/Não

Na hora de salvar, preciso verificar se pelo menos um dos campos foi assinalado.

se foi Salvar, se não Dar uma mensagem que preciso assinalar pelo menus um deles.

no aguardo

O que vc precisa é de uma verificação Select case ou if.

exemplo:

if Campo1 & campo2 & campo3 & campo$ = -1 then
msgbox "Existe algum preenchido"
else
msgbox "Preencha pelo menos um"
end if

use "&"para concatenar os campos
-1 representa true que no caso seria se o campo sim/não estivesse marcado

Veja se atende a sua necessidade:

Código:

If Me.Seleção1 = True Then
    DoCmd.GoToRecord , , acNewRec
Else
        If Me.Seleção2 = True Then
            DoCmd.GoToRecord , , acNewRec
        Else
            If Me.Seleção3 = True Then
                DoCmd.GoToRecord , , acNewRec
            Else
                If Me.Seleção4 = True Then
                    DoCmd.GoToRecord , , acNewRec
                Else
                    If Me.Seleção5 = True Then
                        DoCmd.GoToRecord , , acNewRec
                    Else
                        If Me.Seleção6 = True Then
                            DoCmd.GoToRecord , , acNewRec
                        Else
                            MsgBox "Marque uma das opções!", vbInformation
                        End If
                    End If
                End If
            End If
        End If
    End If

Booooa misaelsp

Boa tarde CaioSouza, obrigado pelo crédito

Esse seu exemplo é uma opção valida quando se quer verificar campo por campo separadamente.
já no caso dele, que só quer saber se pelo menos um ta marcado, é mais facil pelo metodo que falei.


mas mesmo assim fica pra estudo do nosso amigo sidneyeg

Boa tarde

usei o exemplo do misaelsp e funcionou Perfeitamente.

Muito obrigado pela ajuda

Abraço a todos.


Sidney