Options de partage

[agir2]

Bonjour !

Au travail on utilise le partage de fichier excel afin de se transmettre les info en temps réel.
Afin d'améliorer l'automatisation du transfert de données je dois modifier chaque fois les options de partages

*mise à jour des modifications
..Je doit cocher » auto et mettre 5min à chaque jour

Peut-on modifier les options de partage par défauts sous excel 2000 et les enregistrer afin de ne plus avoir à faire cette manip chaque jour ?

Voir pièce jointe 😕

MERCI !

 

[PMO2]

Re : Options de partage

Bonjour,

Une piste en VBA

Copiez le code suivant dans un module standard du classeur à partager

Sub Partage_AutoMaj5minutes()
If ThisWorkbook.Name <> ActiveWorkbook.Name Then Exit Sub
If InStr(1, Application.Caption, "[") > 0 Then
  MsgBox "Classeur déjà partagé"
  Exit Sub
End If
SendKeys "{TAB}P{TAB}{TAB}{TAB}{TAB}{RIGHT}{TAB}{TAB}{TAB}{DOWN}5{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{LEFT}{ENTER}{ENTER}", False
Application.Dialogs(xlDialogFileSharing).Show
End Sub

Sub AnnulerPartage()
If ThisWorkbook.Name <> ActiveWorkbook.Name Then Exit Sub
If InStr(1, Application.Caption, "[") = 0 Then
  MsgBox "Ce classeur n'est pas partagé"
  Exit Sub
End If
SendKeys "{TAB}P{ENTER}", False
Application.Dialogs(xlDialogFileSharing).Show
End Sub

Lancez la macro Partage_AutoMaj5minutes pour partager le classeur avec une mise à jour automatique des modifications toutes les 5 minutes.
Lancez la macro AnnulerPartage pour, comme son l'indique, annuler le partage du classeur.

J'ai fait plusieurs tests avec Excel 2003 sur Windows XP et, chez moi, cela fonctionne. Qu'en est-il chez vous ?

Cordialement.

PMO
Patrick Morange