VBA and Sharepoint Document Workspaces

[Michelangelo]

Hi there,

I want to get the CheckedOut By and CheckedOut Date information from a
document which is saved in a document workspace.

With the following code I also can get the Modified By and Modified Date. So
is it possible to get the Checkin information?

Thx.
M.

Dim swsWorkspace As Office.SharedWorkspace
Dim vlxDoc As SharedWorkspaceFile

Set swsWorkspace = ActiveDocument.SharedWorkspace

For Each vlxDoc In swsWorkspace.Files
MsgBox vlxDoc.ModifiedBy & vbCr & vlxDoc.ModifiedDate
Next