Microsoft 365 Ma macro créé une copie au lieu de modifier le document cible

RemiLPL

XLDnaute Nouveau
Bonjour,

Je vous contact car j'ai un problème avec une macro qui utilise des documents sur un Teams.
Je souhaite prendre des informations d'une feuille excel et la copier dans un autre document excel. Mais quand je lance ma macro il créé un nouvel excel au lieu de modifier l'excel cible. Je ne sais pas pourquoi alors qu'avant cela fonctionnait bien. Je me demande si c'est un problème de droit mais je le lance avec mon compte microsoft et j'ai les droits de modifications sur le document source et le document cible.

Voila mon code
Sub CopierAgendas()
Application.ScreenUpdating = False
Application.DisplayAlerts = False

Set agendas = Workbooks.Open("https://XXXX.sharepoint.com/❌/r/sit...ts et tests/Weekly Agendas Extract XXXXX.xlsm")
Set historique = Workbooks.Open("https://XXXXX.sharepoint.com/❌/r/si...artages/General/ZZZZ - RRRRR SSSSSS GGGG.xlsm")
agendas.Sheets(1).Delete
agendas.Sheets(1).Delete

historique.Sheets(1).Delete

ThisWorkbook.Sheets("AGENDA 1").Copy Before:=agendas.Sheets(1)
ThisWorkbook.Sheets("AGENDA 2").Copy Before:=agendas.Sheets(1)

ThisWorkbook.Sheets("HISTORIQUE 1B").Copy Before:=historique.Sheets(1)

agendas.Close SaveChanges:=True
historique.Close

Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
 

Deadpool_CC

XLDnaute Accro
Bonsoir ...
t'es certain de tes chemein en utilisant le Protocol Http(s). C'est fait pour de la lecture uniquement ... normal qu'il arrive par à modifier.
de souvenir les URL à utiliser pour teams étaient plutôt du genre
Code:
//teamsites.monserveur.intranet/sites/mon-site/Shared Documents/mon-dossier/test.xls

j'ai pas mieux comme piste
A+
 

Statistiques des forums

Discussions
315 083
Messages
2 116 043
Membres
112 641
dernier inscrit
chab77