Inserimento nuovo campo su tabella tramite VBA

di
cataland
il
1 risposte
C
cataland
Pochi posts
Iscritto da
mar, 2020
Messaggi:
32

Inserimento nuovo campo su tabella tramite VBA

Buongiorno a tutti.
Dovrei inserire un nuovo campo su una tabella collegata e non so come fare, ho provato sia con un comando ALTER TABLE in SQL, sia con questi due esempi trovati sul web:

Esempio 1 con DAO
=====================
Currentdb.Execute "ALTER TABLE TuaTabella ADD id Counter"
=====================

Esempio 2 con ADO
====================
Currentproject.Connection.Execute "ALTER TABLE TuaTabella ADD id int
IDENTITY(1,1)"
====================

Soltanto che ricevo il messaggio di errore in quanto la tabella, come già specificato, è collegata e non all'interno del fil access stesso

1 Risposte

  • C
    cataland
    Pochi posts
    Iscritto da
    mar, 2020
    Messaggi:
    32

    Re: Inserimento nuovo campo su tabella tramite VBA

    Trovata la soluzione:
    

Sub Example1()
'an Access object
Dim objAccess As Object
Set objAccess = CreateObject("Access.Application")
'open access database
Call objAccess.OpenCurrentDatabase( _
"D:\StuffBusinessTempNewDB.accdb")
'add field
objAccess.CurrentProject.Connection.Execute ( _
"ALTER TABLE MyTable1 ADD COLUMN NewField CHAR")
End Sub
    Grazie comunque
Devi accedere o registrarti per scrivere nel forum
1 risposte