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

    Criando campo calculado via VBA

    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3153
    Registrado : 21/11/2016

    Criando campo calculado via VBA Empty Criando campo calculado via VBA

    Mensagem  DamascenoJr. Sex 11 Jun 2021, 15:12

    Código:
    Public Sub fncExemploCriaCampoCalculado()

        Dim bd As DAO.Database
        Dim tbl As DAO.TableDef
        Dim cp As DAO.Field2
       
        Set bd = CurrentDb()
        Set tbl = bd.TableDefs("NomeSuaTabela")
       
        Set cp = tbl.CreateField("NomeCampoCalculadoCriar", dbInteger)
        cp.Expression = "[Campo1]+[Campo2]"
        Call tbl.Fields.Append(cp)
        Set cp = Nothing
        Set tbl = Nothing
        Set bd = Nothing

    End Sub


    .................................................................................
    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.

    Francisco Xavier, alozs e Dalazen gostam desta mensagem

    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7352
    Registrado : 15/03/2013

    Criando campo calculado via VBA Empty Re: Criando campo calculado via VBA

    Mensagem  ahteixeira Qua 16 Jun 2021, 19:18

    Olá Damasceno,

    Podemos dizer "com o MaximoAccess é sempre aprender"

    PArabéns e obrigado pela partilha.

    cheers

      Data/hora atual: Seg 25 Out 2021, 23:03