Syntax

expression.ModifiedDate

expression A variable that represents a SharedWorkspaceTask object.

Return Value
Variant

Example
The following example returns a list of shared workspace files whose date and time last modified is earlier than today.

Visual Basic for Applications
Dim swsFile As Office.SharedWorkspaceFile Dim dtmMidnight As Date Dim dtmFileDate As Date Dim strOlderFiles As String dtmMidnight = CDate(FormatDateTime(Now, vbShortDate) & " 12:00:00 am") For Each swsFile In ActiveWorkbook.SharedWorkspace.Files dtmFileDate = swsFile.ModifiedDate If dtmFileDate < dtmMidnight Then strOlderFiles = strOlderFiles & swsFile.URL & vbCrLf End If Next MsgBox "Files not modified today: " & vbCrLf & strOlderFiles, _ vbInformation + vbOKOnly, "Older Files" Set swsFile = Nothing

See also: