Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub Commande0_Click()
 
Dim sSQL As String
 
    sSQL = "ALTER TABLE TBLhistoryBal" & _
           "ADD COLUMN balance200512"
 
    DoCmd.RunSQL sSQL
 
End Sub
Ca fonctionne pas et je comprends pas pourquoi. Meme si je rajoute le type de la colone ca ne marche pas non plus.

Merci pour l'aide