MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]SubForm Editar

    Compartilhe

    Convidado
    Convidado

    [Resolvido]SubForm Editar

    Mensagem  Convidado em Qui 18 Jan 2018, 14:35

    boas
    Utilizo o seguinte código para editar um registo em outro formulário
    Código:
    DoCmd.OpenForm "frmsaidasIC", acNormal, "", "[IDtabCadsaidasIC]=" & Me.IDtabCadsaidasIC, acEdit, acDialog
    No entanto preciso editar um registo em outro fom, mas a linha esta num subformulário, ao tentar utilizar o código acima ele abre o form, mas não edita o registo... Obrigado

    Convidado
    Convidado

    Re: [Resolvido]SubForm Editar

    Mensagem  Convidado em Sex 19 Jan 2018, 11:35

    Continuando a tentar... mas sem êxito . . .

    Código:
    Private Sub Editar_Click()
    DoCmd.OpenForm "frmsaidasIC"
    Forms!frmsaidasIC.IDtabCadsaidasIC.Value = Me.IDtabCadsaidasIC.Value
    End Sub

    Da o seguinte erro após abrir o form ( frmsaidasIC )
    Run-time error '2465':
    Application-defibed or objecdefined error


    form : frmConsultaImputaçõesUtentes
    subform : subfrmfiltro
    abre o form frmSaidasIC
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 867
    Registrado : 07/12/2011

    Re: [Resolvido]SubForm Editar

    Mensagem  tauron em Sex 19 Jan 2018, 11:41

    Tem como postar os objetos envolvidos de preferencia em 2007?

    Convidado
    Convidado

    Re: [Resolvido]SubForm Editar

    Mensagem  Convidado em Sex 19 Jan 2018, 12:38

    segue parte do bd... Obrigado

    Convidado
    Convidado

    Re: [Resolvido]SubForm Editar

    Mensagem  Convidado em Sex 19 Jan 2018, 17:54

    tentei por outro caminho... DuploClick !

    Código:
    Dim stDocName As String
    Dim stLinkCriteria As String '
    stDocName = "frmSaidasIC"
    stLinkCriteria = "[IDtabCadsaidasIC]=" & Me![IDtabCadsaidasIC]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

    Abre o form pretendido sem erros mas, não Mad apresenta o registo pretendido ( clicado ) ! No

    Idea Idea Idea
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 867
    Registrado : 07/12/2011

    Re: [Resolvido]SubForm Editar

    Mensagem  tauron em Sex 19 Jan 2018, 18:46

    Não consegui abrir aqui (access 2007). Vou tentar abrir mais a noite (access 2013).

    Convidado
    Convidado

    Re: [Resolvido]SubForm Editar

    Mensagem  Convidado em Seg 22 Jan 2018, 19:18

    Obrigado a todos com a ajuda do mestre Avelino consegui resolver a questão. A bílis da questão estava no código do form frmSaidasIC - DoCmd.GoToRecord , , acNewRec. Obrigado a todos... Abraço !

      Data/hora atual: Qua 25 Abr 2018, 03:58