Liaison d'une liste dans une DB access

Bonjour,


Je souhaite lier une liste sharepoint à une application Access 2013 via le VBA.
l'instruction 'DoCmd.TransferSharePointList acLinkSharePointList' fonctionne mais je reçois un popup me demandant mon login + mdp, j'aimerais que ces paramètres soient intégrés à mon code.

J'ai essayé ceci, mais ce n'est visiblement pas la bonne solution

Code:

---

DoCmd.TransferSharePointList acLinkSharePointList, "https://....", "T_Liste_4021", , "T_Liste_4021", User = "xxx", Password = "yyy"

---

Quelqu'un peut-il m'aider ?

Merci

Bonjour,

Pas sur que cela soit possible via VBA. L'identification est gérée par le système d'exploitation. Ces données se retrouvent dans le gestionnaire d'identification dans le panneau de configuration sous la rubrique Comptes d'utilisateurs.

J'ai trouvé. Désolé de m'être éloigné de ce sympathique forum pendant longtemps.

Ce que je fais : j'ai une fonction qui me fait le rattachement de mes listes SP, exécutée systématiquement à l'ouverture de la base.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

function ActualiserAttaches() as boolean Dim arrTablename As Variant, arrSourceName As Variant, strSite As String, i As Long   arrTablename = Array("Activités", "Sorties") ' ne pas mettre UserInfo, c'est rajouté automatiquement arrSourceName = Array("{****995E-****-****-****-30698C68****}", "{****2B85-****-****-****-70F4843F****}") ' , "{****51AD-****-****-****-867E0287****}") strSite = "https://xxx.sharepoint.com/sous-site"   For i = LBound(arrTablename) To UBound(arrTablename) ' supprimer la table avant tout, sauf si elle n'existe pas On Error Resume Next CurrentDb.TableDefs.Delete (arrTablename(i)) ' On Error GoTo ActualiserAttaches_Err DoCmd.TransferSharePointList acLinkSharePointList, strSite, arrSourceName(i), , arrTablename(i), False Next i ActualiserAttaches = True 'la fonction est réussie Return ActualiserAttaches_Err: MsgBox "Erreur " & err.Number & " (" & err.Description & _ ") dans ActualiserAttaches - " & arrTablename(i), vbCritical Return

---

Le côté pénible c'est de récupérer les ID des listes SP. Je ne sais pas les trouver par programmation (ça doit être possible, je veux bien le conseil) donc je le fais dans SharePoint Designer 2013, mais du coup ce n'est pas très portable.

Enfin pour la connexion, SP demande l'identité de l'utilisateur au premier traitement ; je donne celle d'un user avec droit de modif sur les listes concernées.