J'écris VBA dans MS Project et j'ai besoin d'ouvrir un fichier Excel pour sauvegarder des choses. Ce fichier Excel peut être utilisé par quelqu'un d'autre. Donc, je voudrais enregistrer le fichier en lecture seule et quand il est ouvert via VBA passer en mode écriture.Ouvrir en mode écriture fermer en lecture seule
trouvé la réponse
'Before opening the book I set to vbNormal
Set xlapp = CreateObject("Excel.Application")
SetAttr supportDoc_loc & Dir(master_statusGlobal_loc), vbNormal
Set xlbook = xlapp.Workbooks.Open(master_statusGlobal_loc)
'After the changes I close the book as vbReadOnly
xlbook.Close SaveChanges:=True
SetAttr supportDoc_loc & Dir(master_statusGlobal_loc), vbReadOnly