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
si vous avez une solution pour adapter pour que je puisse me
connecter a ma base access sans la telecharger
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