BenHarber
XLDnaute Occasionnel
Bonjour le Forum,
Dans un fichier ''destination'', j'utilise une macro avec une commande SQL super pratique pour interroger un second fichier ''source'' sans l'ouvrir ! (merci à tous les contributeurs du forum sur ce sujet !).
Le fichier "destination" est en lecture seule. Il sert exclusivement à du "requêtage" sur les données du fichier source
'----------------------------------------------------------------------
Le code est le suivant :
Dim wbkDerExtr As String
Dim Cn As Object, rqst As Object
'Définit le classeur fermé servant de base de données
wbkDerExtr = ThisWorkbook.Path & "\BD\DernExtrac.xls"
Set Cn = CreateObject("ADODB.Connection")
With Cn
.Provider = "MSDASQL"
.ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _
"DBQ=" & wbkDerExtr & "; ReadOnly=True;"
.Open
End With
'----------------------------------------------------------------------
Jusqu'à présent ces 2 fichiers étaient placés sur un serveur et tous les collaborateurs proches ouvraient 'classiquement' via Excel le fichier destination. (dans les faits, personne ne se rend compte qu'il va requêter sur un autre fichier source)
Or, pour faciliter le partage des données entre utilisateurs de nombreux sites distants, on m'a proposé de placer les 2 fichiers en question sur un site ''SharePoint'' (site Web représentant un espace de collaboration et un lieu de stockage centralisé pour les documents).
Je viens d'essayer, mais maintenant la macro plante sur la commande ''.Open'' (cf. avant dernière ligne du code ci-dessus).
Quelqu'un aurait-il une idée de la commande qui pourrait être utilisée à la place de ''.Open'' ?
(mais peut-être que cette manière de requêter n'est-elle plus possible ??...)
Pour info : le chemin du fichier source (''wbkDerExtr'') qui ressemblait à ''W:\RAP\BD\DernExtrac.xls'' est devenu, depuis sa mise en ligne sous intranet : ''http://www./trucmuche.fr/site_partage/documents\BD\DernExtrac.xls''
Pour info-bis : je bidouille pas mal sur VBA (1000 mercis le Forum !) MAIS ne suis pas informaticien ; autrement dit indulgent...
Merci d'avance pour vos idées souvent lumineuses et constructives
Cordialement,
BenHarber
Dans un fichier ''destination'', j'utilise une macro avec une commande SQL super pratique pour interroger un second fichier ''source'' sans l'ouvrir ! (merci à tous les contributeurs du forum sur ce sujet !).
Le fichier "destination" est en lecture seule. Il sert exclusivement à du "requêtage" sur les données du fichier source
'----------------------------------------------------------------------
Le code est le suivant :
Dim wbkDerExtr As String
Dim Cn As Object, rqst As Object
'Définit le classeur fermé servant de base de données
wbkDerExtr = ThisWorkbook.Path & "\BD\DernExtrac.xls"
Set Cn = CreateObject("ADODB.Connection")
With Cn
.Provider = "MSDASQL"
.ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _
"DBQ=" & wbkDerExtr & "; ReadOnly=True;"
.Open
End With
'----------------------------------------------------------------------
Jusqu'à présent ces 2 fichiers étaient placés sur un serveur et tous les collaborateurs proches ouvraient 'classiquement' via Excel le fichier destination. (dans les faits, personne ne se rend compte qu'il va requêter sur un autre fichier source)
Or, pour faciliter le partage des données entre utilisateurs de nombreux sites distants, on m'a proposé de placer les 2 fichiers en question sur un site ''SharePoint'' (site Web représentant un espace de collaboration et un lieu de stockage centralisé pour les documents).
Je viens d'essayer, mais maintenant la macro plante sur la commande ''.Open'' (cf. avant dernière ligne du code ci-dessus).
Quelqu'un aurait-il une idée de la commande qui pourrait être utilisée à la place de ''.Open'' ?
(mais peut-être que cette manière de requêter n'est-elle plus possible ??...)
Pour info : le chemin du fichier source (''wbkDerExtr'') qui ressemblait à ''W:\RAP\BD\DernExtrac.xls'' est devenu, depuis sa mise en ligne sous intranet : ''http://www./trucmuche.fr/site_partage/documents\BD\DernExtrac.xls''
Pour info-bis : je bidouille pas mal sur VBA (1000 mercis le Forum !) MAIS ne suis pas informaticien ; autrement dit indulgent...
Merci d'avance pour vos idées souvent lumineuses et constructives
Cordialement,
BenHarber
Dernière édition: