connexion excel et access dans mon cloud onedrive

chich

XLDnaute Occasionnel
Bonjour,
j'utilise cette macro pour me connecter a ma base access
protéger par mdp depuis excel
sa fonction très bien en dans l’état
mais je souhaite place ma base access dans mon onedrive
pour alimenter ma Listview dans un userform excel sur clé usb je me connecte
a ma base access "ListView table.accdb" sur les pc qui n'ont pas access d’installer
si vous avez une solution pour l'adapter pour que je puisse me
connecter a ma base access sans la télécharger depuis n'importe quel pc
Je souhaite pouvoir rechercher, ajouter, modifier, supprimer des enregistrements
Dans la ou les tables
Et remplacer une table par une autre mise à jour dans mon onedrive

merci d'avance
Cordialement

Sub Connecte_base_Access()
Dim rs As Object
Dim Nom_Base, Chemin_Base, SQL, PAPA, Admin, Uid, pwd, ExtendedAnsiSQL ', connstring

Set conn = CreateObject("ADODB.Connection")
Nom_Base = "ListView table.accdb"
Chemin_Base = ThisWorkbook.Path & "\" & Nom_Base
connstring = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)}; DBQ=" & Chemin_Base & ";Uid=Admin;Pwd=PAPA;ExtendedAnsiSQL=1;"
conn.Open connstring
End Sub
 

Statistiques des forums

Discussions
312 097
Messages
2 085 257
Membres
102 844
dernier inscrit
atori2