returns the number of weeks between June 3, 2006 and September 30, 2006: : DateDiff « Date Functions « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Date Functions
  3. DateDiff

returns the number of weeks between June 3, 2006 and September 30, 2006:

 
Sub dateD()
    MsgBox DateDiff("ww", "6/3/2006", "9/30/2006")
End Sub
'Using the Dir Function to Check Whether a File Exists
  Sub Does_File_Exist()
      Dim strTestFile As String, strNameToTest As String
      strNameToTest = "c:\"
      If strNameToTest = "" Then End
      strTestFile = Dir(strNameToTest)
      If Len(strTestFile) = 0 Then
          Debug.Print "The file " & strNameToTest & " does not exist."
      Else
          Debug.Print "The file " & strNameToTest & " exists."
      End If
  End Sub








Related examples in the same category

1.DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) returns the interval between two specified dates
2.DateDiff returns the interval of time between two dates:
3.Difference between two dates in days and months:
4.DateDiff() function returns the difference between two dates. The unit for the difference is specified as a string ( "s" for second, "m" for month, "yyyy" for year, and so on).
5.DateDiff("m", Now, "10/10/03")
6.DateDiff("yyyy", Now, "10/10/03")
7.DateDiff("m", "3/15/2000", Now)
8.Use DateDiff function