MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    avatar
    utazevedo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 07/08/2017

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  utazevedo em 26/4/2020, 01:53

    Prezados,

    Tenho um formulário continuo que no final de cada linha existe um botão para bloquear o registro selecionado.

    No botão eu coloquei:

    Private Sub Comando273_Click()

    If MsgBox("Deseja Finalizar a CESV?", vbYesNo, "Encerrar") = vbYes Then
       
       me.cesv.Locked = True
       me.cia_aerea.Locked = True
       me.voo.Locked = True
       me.volume.Locked = True
       me.peso.Locked = True
       me.hora_documental.Locked = True
       me.hora_encerrado.Locked = True
       me.hora_protocolo.Locked = True
       me.divergencia.Locked = True
       me.observacao.Locked = True

       DoCmd.SetWarnings True
       MsgBox "Cesv Encerrada!", vbInformation, "Encerrada"
       DoCmd.GoToRecord , , acLast
       End If

    End Sub

    A questão é que ao clicar no botão, os controles de todos os registros do formulario continuo são bloqueados. O correto seria bloquear apenas os controles da linha selecionada.


    Alguém poderia dar um apoio?

    Atte.

    Urbano Azevedo
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 295
    Registrado : 28/10/2010

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty Re: [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  zcarloslopes em 28/4/2020, 08:56

    Bom dia utazevedo,

    Tente colocar um segundo if com:
    Código:
    If Me.RecordSelectors = True Then
       Me.cesv.Locked = True
       Me.cia_aerea.Locked = True
       ....
    Else
       Me.cesv.Locked = False
       Me.cia_aerea.Locked = False
       .....
    End If
    avatar
    utazevedo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 07/08/2017

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty Re: [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  utazevedo em 29/4/2020, 00:54

    ZcarlosLopes,

    Infelizmente não funcionou, se quiser dar uma olhada estou anexando o banco.

    Infelizmente está bloqueando todas a linha, o correto é bloquer apenas a linha do registro selecionado.

    Obrigado pelo feedback.

    No aguardo!

    Urbano Azevedo
    Anexos
    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. AttachmentControle_Manifesto_v01 (2).zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (726 Kb) Baixado 5 vez(es)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2088
    Registrado : 22/11/2016

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty Re: [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  DamascenoJr. em 29/4/2020, 02:59

    Na tabela tbl_controlemanifesto não existe nenhum campo para registrar que a CESV está finalizada. Do jeito que está, se eu finalizar uma CESV, abrir e fechar o aplicativo, como poderia saber qual CESV deveria estar finalizada se não salvei a informação em nenhum local?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    utazevedo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 07/08/2017

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty Re: [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  utazevedo em 29/4/2020, 15:11

    Grande Damasceno,

    Obrigado pelo apoio, mas não sei como fazer. é possível me ajudar no Banco que enviei e explicar o q foi feito?

    Estou travado nisso tentei varias coisas.

    Atte.

    Urbano Azevedo
    avatar
    utazevedo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 07/08/2017

    [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo. Empty Re: [Resolvido]Bloquear Apenas a Linha Selecionada no Formulário Continuo.

    Mensagem  utazevedo em 30/4/2020, 19:54

    Resolvido.

    Obrigado!

      Data/hora atual: 2/7/2020, 09:26