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]memoria dim

    avatar
    fazerbem
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 383
    Registrado : 05/03/2017

    [Resolvido]memoria dim Empty [Resolvido]memoria dim

    Mensagem  fazerbem em 27/3/2019, 21:04

    Ola

    Tenho numa macro a seguinte linha


    Dim d
    d = Forms![Frm_Combos].Form.Ref.Value

    Forms![Frm_Combos].Form.C1.Value = Me.lista.Column(0, Linha)

    Esta ok ate aqui, porem preciso que "C.Value ", possa receber a Dim, podendo ser c1, C2, C3, C4 ou C5 conforme a Dim "d",

    Coloquei assim e da erro,

    Forms![Frm_Combos].Form.C & "d".Value = Me.lista.Column(0, Linha), qual seria o certo ?

    Grato

    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3101
    Registrado : 21/04/2011

    [Resolvido]memoria dim Empty Re: [Resolvido]memoria dim

    Mensagem  Marcelo David em 27/3/2019, 21:18

    Boa noite,
    não entendi bem o que são esses "Cs"...
    Mas no escuro, tente:

    Forms![Frm_Combos].Form.C & d & = Me.lista.Column(0, Linha)

    Estou considerando C & d & formar o nome de um controle... Mas confesso que fiquei muito confuso com o enunciado...


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    fazerbem
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 383
    Registrado : 05/03/2017

    [Resolvido]memoria dim Empty Re: [Resolvido]memoria dim

    Mensagem  fazerbem em 27/3/2019, 21:38

    C1, C2, C3, C4,C5 significa:

    Caixa texto 1 , caixa texto 2, caixa texto 3 ...

    quem ira dizer se será C1 ou C2 ou C3 ... e a Dim d
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3101
    Registrado : 21/04/2011

    [Resolvido]memoria dim Empty Re: [Resolvido]memoria dim

    Mensagem  Marcelo David em 28/3/2019, 02:13

    Vamos lá então,
    teste:

    Dim d
    Dim strCtl as String 'Aqui declaro uma variável que representará o "C"

    d = Forms![Frm_Combos].Form.Ref.Value

    strCtl = "C" & d

    Forms![Frm_Combos].Form(strCtl) = Me.lista.Column(0, Linha)


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    fazerbem
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 383
    Registrado : 05/03/2017

    [Resolvido]memoria dim Empty Re: [Resolvido]memoria dim

    Mensagem  fazerbem em 28/3/2019, 13:01

    Amigao, deu tudo certo agora, grato mesmo

    Andre
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3101
    Registrado : 21/04/2011

    [Resolvido]memoria dim Empty Re: [Resolvido]memoria dim

    Mensagem  Marcelo David em 28/3/2019, 13:24

    Gratos pelo retorno!


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)

      Data/hora atual: 8/7/2020, 05:59