ich suche meinen Namen im Forum, um Lösungen auf meine Fragen zu lesen.
Nach einigen Tagen sind diese Beiträge verschwunden. Wie finde ich diese Beträge wieder.
Sub Makro2()
Dim Zeit
Zeit = Now() + 0.0007
Do
Workbooks.Open Filename:="\\Server\Login\ServerLogin.xls" _
, ReadOnly:=False, Notify:=False, AddToMru:=False
'Hier erscheint ein Fenster ... Datei schreibgeschützt öffnen?
'das soll weg.
If Not ActiveWorkbook.ReadOnly Then
Exit Do
End If
ActiveWorkbook.Close
Loop Until Now() > Zeit
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen