MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    Incluir Registro com Dados do Formulario Anterior

    avatar
    Claudemir P
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 27/06/2013

    Incluir Registro com Dados do Formulario Anterior Empty Incluir Registro com Dados do Formulario Anterior

    Mensagem  Claudemir P 27/6/2013, 14:03

    Bom dia. Utilizo dois formulario, o primeiro abre o segundo para incluir um novo registro e preenche alguns campos com os dados do primeiro formulario. Porem depois de preencher os dados ele retorna para o primeiro registro, o problema e que preciso matenha a posicao no novo registro para concluir o preenchimento e nao retornar ao primeiro.

    Codigo Primerio formulario
    Private Sub BtNovaAssist_Click()
    CodiCliente = [CodCliente]
    DoCmd.RefreshRecord
    DoCmd.Close
    Call SalvarNovo
    End Sub


    Codigo do Modulo
    Option Explicit
    Public CodiCliente As Integer

    Function SalvarNovo()
    Dim OsMAx As Long
    OsMAx = ((DMax("[MaxOS]", "Consul_AssistenciaNumOS")) + 1)
    DoCmd.OpenForm "Form_AssistDet"
    DoCmd.GoToRecord , , acNewRec

    Form_Form_AssistDet.OS = OsMAx

    If IsNull(CodiCliente) = False Then
    Form_Form_AssistDet.Selecao_CodCliente = CodiCliente
    Form_Form_AssistDet.DeixadoPor = CodiCliente
    CodiCliente = 0
    End If
    matheuspereira
    matheuspereira
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 513
    Registrado : 31/12/2012

    Incluir Registro com Dados do Formulario Anterior Empty incluir Registro com Dados do Formulário Anterior

    Mensagem  matheuspereira 28/6/2013, 16:16

    Boa tarde Claudemir. Quando o segundo formulário e aberto, o primeiro e fechado ou fica aberto em segundo plano?
    Se estiver em segundo plano vc pode fazer uma consulta para retornar o ultimo registro na tela do formulário.. Poste seu bd para dar uma olhada melhor..
    avatar
    Claudemir P
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 27/06/2013

    Incluir Registro com Dados do Formulario Anterior Empty Re: Incluir Registro com Dados do Formulario Anterior

    Mensagem  Claudemir P 30/6/2013, 22:06

    Boa tarde Matheus,

    O formulário 1 é fechado antes da abertura do segundo. Porém após preencher o segundo com os dados do primeiro, a posição do registro retorna ao primeiro.

    Encontrei o problema: abrir o formulário um através de macro ao invés de vba.

    Porém ainda assim, eu gostaria de utilizar a macro para abertura do primeiro e vba para abertura do segundo.

    Fico grato se houver solução.
    Anexos
    Incluir Registro com Dados do Formulario Anterior AttachmentDatabase1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (139 Kb) Baixado 11 vez(es)

    Conteúdo patrocinado


    Incluir Registro com Dados do Formulario Anterior Empty Re: Incluir Registro com Dados do Formulario Anterior

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 13:34