opa amigos tudo bem?
montei uma logica atraves do referenciamento entre forms.
porem estou com dificuldade.
queria que ao clickar no forms relacionado de outro form faça a função.
segue abaixo para terem um ideia.
alguem poderia me dar um luz?
abraços
montei uma logica atraves do referenciamento entre forms.
porem estou com dificuldade.
queria que ao clickar no forms relacionado de outro form faça a função.
segue abaixo para terem um ideia.
alguem poderia me dar um luz?
- Código:
If Forms!formhistorico!sel_fich_cad = True Then
Forms!formhistorico!sel_fich_cad.Locked = True
If Me.OnClick Then
DoCmd.OpenForm "frm_vigencia"
ElseIf Forms!formhistorico!sel_fich_cad = False Then
Forms!formhistorico!sel_fich_cad.Locked = False
If MsgBox("Tem Certeza o Documento do Prestador", vbYesNo, "Exit") = vbYes Then
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("select id_geral, Ficha_cadastral_preenchida from DOCUMENTOS where id_geral = " & Forms!formhistorico!CODPASTA & "")
rs.Edit
rs("Ficha_cadastral_preenchida") = Forms!formhistorico!sel_fich_cad
rs.Update
rs.Close
MsgBox " DOC Registrado"
Else
Forms!formhistorico!sel_fich_cad = rs!sel_fich_cad
End If
End If
End If
abraços
Última edição por maguim em 21/9/2018, 20:16, editado 2 vez(es)