Partager un fichier Excel de VB

bonjour,

J'ai un fichier partagé sous excel qui contient des macros. Or pour certaines je dois enlever le partage pour les activer.

Quelqu'un saurait il s'il y a moyen d'enlever la fonctionnalité de partage du fichier excel à l'aide de VB pour que je l'integre dans mes macros.

merci d'avance

Bonjour,

J'utilise ça et ça marche !

' J'ouvre mon fichier qui est en partagé

' Mode SHARED "OFF" à l'ouverture

If ActiveWorkbook.MultiUserEditing Then

Application.DisplayAlerts = False ' Pas de message d'erreur

ActiveWorkbook.ExclusiveAccess ' Accès exclusif activé !

Application.DisplayAlerts = True

End If

' Mon fichier est en mode exclusif; je peux appeler mes autres macros

Macro1

Macro...

' Et avant de sortir

' Sauvegarde en réactivant le partage !

If Not ActiveWorkbook.MultiUserEditing Then

Application.DisplayAlerts = False

ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, accessMode:=xlShared

Application.DisplayAlerts = True

End If

Sinon pour une sauvegarde en mode exclusif : ActiveWorkbook.Save

(pratique pour récupérer la dernière ligne, colonne utilisée d'une feuille !)

Bon Courage

Armel

Rechercher des sujets similaires à "partager fichier"