Ouverture d'une table Access depuis Excel

[Sly le globe trotter]

Bonjour le forum,

Merci pour l'aide qu'on peut trouver sur ce forum, c'est fort appréciable ! J'ai cherché à droite à gauche, dans la FAQ et le forum mais n'ai rien trouvé qui correspond à mon souci...

J'ai déjà posté sur un sujet similaire mais comme le sujet a dévié je voulais mettre à jour l'intitulé du post, pour faciliter de futurs recherches...

Je cherche à ouvrir une table Access depuis Excel. ça parait tout simple sur la papier en utilisant les librairies ADODB :

Option explicit
Const Table1 As String = "Tests bélier"

Dim Conn As New ADODB.Connection
Dim rsT As New ADODB.Recordset

With rsT
    .ActiveConnection = Conn
    .Open Table1, LockType:=adLockOptimistic
End With

ça marche très bien tant que le nom de la table ne comporte pas d'espace... mais ça plante si le nom de la table comporte un espace. Dans les bouquins ou forums que j'ai consulté, je n'ai rien trouvé à ce sujet. Auriez-vous une solution ?

Merci

[Bricofire]

Bonsoir Sly le globe trotter,

Est-tu allé voir sur le Wiki de Michel XLD ?... Page 6 ?

http://www.excel-downloads.com/html/...chelXldPageSix

bonne soirée,

[Sly le globe trotter]

Bonjour Bricofire, le forum,

Je suis effectivement allé jeter un coup d'oeil sur le wiki de MichelXLD mais n'ai rien trouvé de particulier sur l'ouverture de table dont le nom comporte un espace...

Dommage pour moi Peut-être que quelqu'un pourra m'aider...

Merci

[michel_m]

bonjour sly, Bricofire

Il faut mettre le nom de la table entre crochets

Michel_M

[Sly le globe trotter]

Bonjour Michel_M, le forum,

Merci pour ces précieux conseils, celà fonctionne maintenant. C'est drôlement filou comme solution ! Je la mets ici si ça peut servir !

Const Table1 As String = "[Tests bélier"
With rsT
    .ActiveConnection = Conn
    .Open Table1, LockType:=adLockOptimistic
End With

Merci et bon we à tous
Sylvain