.CanCheckIn und CanCheckOut
Holger
ich hoffe Ihr könnt mir auf die Sprünge helfen. Wir bekommen eine Fehlermeldung die da lautet:
Fehler beim kompilieren: Methode oder Datenobjekt nicht gefunden. Markiert ist dann in Blau .CanCheckIn
Der VBA Code der zugrunde liegt ist folgender
Option Explicit
Public Const datei As String = "http://teamsites..."
Sub Test ()
Dim wb As Excel.Workbooks
Set wb = Application.Workbooks(datei)
Application.Workbooks(1).SaveAs filename:=datei
if wb.CanCheckIn Then
MsgBox "OK"
Else
MsgBox "No"
End If
Worbooks(1).close
End Sub
Danke für Eure Hilfe
Gruß
Holger