Seulement il me demande de confirmer le remplacement du fichier, comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName, accessMode:=xlShared End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
--
*!* ----------------------------------- EmanuelL Membre d'AtoutFox www.atoutfox.org
isabelle
bonjour Emanuel,
Application.DisplayAlerts = False If Not ActiveWorkbook.MultiUserEditing Then ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName, accessMode:=xlShared End If Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier, comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName, accessMode:=xlShared End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
bonjour Emanuel,
Application.DisplayAlerts = False
If Not ActiveWorkbook.MultiUserEditing Then
ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName,
accessMode:=xlShared
End If
Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier,
comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then
ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName,
accessMode:=xlShared
End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Application.DisplayAlerts = False If Not ActiveWorkbook.MultiUserEditing Then ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName, accessMode:=xlShared End If Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier, comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName, accessMode:=xlShared End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
EmanuelL
Merci encore Isabelle, je teste.
Cordialement. ;-)
Dans son message précédent, isabelle a écrit :
bonjour Emanuel,
Application.DisplayAlerts = False If Not ActiveWorkbook.MultiUserEditing Then ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName, accessMode:=xlShared End If Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier, comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName, accessMode:=xlShared End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
--
*!* ----------------------------------- EmanuelL Membre d'AtoutFox www.atoutfox.org
Merci encore Isabelle, je teste.
Cordialement. ;-)
Dans son message précédent, isabelle a écrit :
bonjour Emanuel,
Application.DisplayAlerts = False
If Not ActiveWorkbook.MultiUserEditing Then
ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName, accessMode:=xlShared
End If
Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier, comment
eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then
ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName,
accessMode:=xlShared
End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
--
*!* -----------------------------------
EmanuelL
Membre d'AtoutFox
www.atoutfox.org
Application.DisplayAlerts = False If Not ActiveWorkbook.MultiUserEditing Then ActiveWorkbook.SaveAs Filename:¬tiveWorkbook.FullName, accessMode:=xlShared End If Application.DisplayAlerts = True
isabelle
EmanuelL a écrit :
Merci beaucoup Isabelle;
Seulement il me demande de confirmer le remplacement du fichier, comment eviter cette fenêtre, ou commen faire ça en mode silence?
isabelle a écrit :
bonjour Emanuel,
If Not ActiveWorkbook.*MultiUserEditing* Then ActiveWorkbook.SaveAs fileName:¬tiveWorkbook.FullName, accessMode:=xlShared End If
|isabelle
EmanuelL a écrit :
Bonjour à Tous,
Comment activer le partage du classeur Excel par macro VBA?
Merci d'avance de votre aide.
;-)
--
*!* ----------------------------------- EmanuelL Membre d'AtoutFox www.atoutfox.org