Arbeitsmappe freigeben
26.06.2007 11:23:24
Andre´
ich habe folgendes Makro mit der die Arbeitsmappe freigegeben wird.
Sub Arbeitsmappefreigeben()
Application.DisplayAlerts = False
If Not ActiveWorkbook.MultiUserEditing Then
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, _
AccessMode:=xlShared
End If
Application.DisplayAlerts = True
End Sub
danach ist diese Einstellung gegeben
Ich möchte aber gern diese Einstellung erhalten.
Hat jemand eine Idee wie da das Makro aussieht
Danke im Voraus!
MFG Andre
Anzeige
