récupérer des info sur la ressource et deconnecter la liste des ressources

Bonjour,
Je souhaiterais récupérer par VBA le champs générique pour alimenter un tableau des charges..... je n'ai pas trouvé quelqu'un peut me mettre sur la voie??
Par ailleurs je souhaite désolidariser le fichier de la liste des ressources et ce automatiquement à chaque enregistrement, j'ai bien fait une petite macro mais elle provoque fréquemment des plantages?????
Private Sub Project_BeforeSave(ByVal pj As Project)
' Macro desol_ress
MsgBox ("en enregistrant vous serez déconnecté de la liste des ressources")

Application.DisplayAlerts = False

ResourceSharing Share:=False

End Sub


Merci à vous