Here is the way to convert dates to array. Replace the normal quotes used for string to hash (#).
Function Convert_Date_Into_Array()
Dim arDates
arDates = Array(#1/1/2008#, #2/1/2008#, #3/1/2008#)
For i = 1 To UBound(arDates)
MsgBox arDates(i)
Next i
End Function
The Array Function returns a Variant containing an array.
Syntax
Array(arglist)
The required arglist argument is a comma-delimited list of values that are assigned to the elements of the array contained within the Variant. If no arguments are specified, an array of zero length is created.
No comments:
Post a Comment