Bonsoir tout le monde!
Je souhaite copier-coller de la façon la plus automatisée possible un fichier texte (ouvert dans excel par macro) dans une table Access fixe.
Je souhaite par exemple ajouter une instruction qui demande à Excel d'ouvrir Access.
Voici ce que j'ai trouvé :
Sub test()
Dim acApp As Object
On Error Resume Next
Set acApp = GetObject('T:\\interv\\scor2.mdb', 'Access.Application')
'Set acApp = CreateObject('Access.Application')
'Set basemdb = acApp.OpenCurrentDatabase('T:\\interv\\scor2.mdb')
'Set acApp = Nothing
acApp.Visible = True
acApp.Close = False
End Sub
Cette macro ouvre 'trop bien' la base Access puisqu'on la voit s'ouvrir mais pour se refermer aussitôt!
Savez vous s'il y a moyen de laisser ouverte cette application Access de manière à ce qu'on n'ait pas à la chercher, à l'ouvrir etc?
Je vous remercie d'avance,
Alexis, débutant en VBA...
Je souhaite copier-coller de la façon la plus automatisée possible un fichier texte (ouvert dans excel par macro) dans une table Access fixe.
Je souhaite par exemple ajouter une instruction qui demande à Excel d'ouvrir Access.
Voici ce que j'ai trouvé :
Sub test()
Dim acApp As Object
On Error Resume Next
Set acApp = GetObject('T:\\interv\\scor2.mdb', 'Access.Application')
'Set acApp = CreateObject('Access.Application')
'Set basemdb = acApp.OpenCurrentDatabase('T:\\interv\\scor2.mdb')
'Set acApp = Nothing
acApp.Visible = True
acApp.Close = False
End Sub
Cette macro ouvre 'trop bien' la base Access puisqu'on la voit s'ouvrir mais pour se refermer aussitôt!
Savez vous s'il y a moyen de laisser ouverte cette application Access de manière à ce qu'on n'ait pas à la chercher, à l'ouvrir etc?
Je vous remercie d'avance,
Alexis, débutant en VBA...