Ok, avec t'a reponse cela va mieux, mais ne ressoud pas mon pb.
Sur mon PC de boulot, j'ai une base ACCESS mais qui n'est accessible que par une liason ODBC (si j'ai bien compris access n'est pas installe sur ce PC)
je souhaiterais extraire des données d'une table via une requete avec une condition "WHERE", pour les mettre dans un fichier excel
avec le programme ci-dessous mon PC plante est tente d'ouvrir ACCESS, je pense que la ligne
vBaseDeDonnées.Open & vSQL
sont à mettre en liaison ODBC
Avez-vous une solution
Cela me dépannerait bien
Option Explicit
Public vBaseDeDonnées As New ADODB.Connection
Public vDonnées As New ADODB.Recordset
Public vTable As String
Public vSource As String
Sub AccèBaseDeDonnées()
Connexion
frmAccess.Show
End Sub
Sub Connexion()
Dim vSQL As String
Dim vDossier As String
vDossier = "D:"
vSource = "bd1.mdb"
vTable = "Clients"
vBaseDeDonnées.Open "OLEDB;Provider=Microsoft.Jet.OLEDB.4.0;" & "persist security info=false;" & "data source=" & vDossier & vSource
vSQL = "Select * From " & vTable
vDonnées.Open vSQL, vBaseDeDonnées, adOpenStatic, adLockReadOnly
End Sub
Je constate que tu as placé ta question dans la section VB.net; mais que tu parles d'une macro. Pour les macros, il y a une place pour VBA dans la section langages dérivés de la branche VB6.
Ce serait bon que tu précises quelle version de VB tu utiles : VB.net, VB6 ou VBA et aussi, à l'avenir, de respecter les divisions prévues du forum.
Une fois que ce sera fait, un gentil administrateur, va probablement procéder aux réaménagements appropriés.