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]Acrescentar uma Coluna a uma Tabela já existente via VBA

    avatar
    dave123
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 61
    Registrado : 07/03/2011

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  dave123 em 11/3/2011, 21:21

    Como posso acrescentar uma nova coluna a uma Tabela já existente via VBA
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  vieirasoft em 11/3/2011, 21:47

    Teste por favor

    Public Sub addColumn()
    Dim strField As String
    Dim curDatabase As Object
    Dim tblTeste As Object
    Dim fldNew As Object

    Set curDatabase = CurrentDb
    Set tblTeste = curDatabase.TableDefs("Teste")

    strField = "TesteColumn"

    Set fldNew = tblTeste.CreateField(strField, dbLong)
    tblTeste.Fields.Append fldNew
    End Sub

    avatar
    Convidad
    Convidado

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  Convidad em 11/3/2011, 22:57

    ou simplesmente

    Pode aplicar no evento VBA ao clikar de um botão

    CurrentDb.Execute ("ALTER TABLE suatabela ADD COLUMN novacoluna Text;")

    Text é o formato para a nova coluna.

    avatar
    dave123
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 61
    Registrado : 07/03/2011

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  dave123 em 12/3/2011, 08:08

    Muito Obrigado a Ambos ... os dois procedimentos funcionam Very Happy
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  vieirasoft em 12/3/2011, 11:32

    Obrigado pelo retorno e bom trabalho
    avatar
    Convidad
    Convidado

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  Convidad em 12/3/2011, 13:11

    grande vieira este topico não estaria melhor na sala VBA ?

    aqui supostamente será referente a tabelas.
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  vieirasoft em 12/3/2011, 13:33

    Tem toda a razão, é para lá que vai (rsrsrs)

    Conteúdo patrocinado

    [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA Empty Re: [Resolvido]Acrescentar uma Coluna a uma Tabela já existente via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/6/2019, 21:56