I wrote a macro to test this and the date format dd.mm.yyyy
is invalid, it seems you must use dd/mm/yyyy
(using slashes instead of period) or dd-mm-yyyy
(using hyphens instead of periods):
Sub Macro1()
Dim minDate As Date
Dim DateStr As String
' with slashes, ok
DateStr = "27/12/2013"
minDate = CDate(DateStr)
' replace periods w/ slashes, ok
DateStr = "27.12.2013"
minDate = CDate(Replace(DateStr, ".", "/"))
' replace periods w/ hyphens, ok
DateStr = "27.12.2013"
minDate = CDate(Replace(DateStr, ".", "-"))
' type mismatch
DateStr = "27.12.2013"
minDate = CDate(DateStr)
End Sub
So, to solve your problem, you just need to replace all periods in your date to either hyphen or slash:
minDate = CDate(Replace(Table.Cell(i, 4).Range.Text, ".", "/"))