excel中怎么选取日期

excel中如何选取日期
excel中的同一行不同列的单元格中填写了不同的日期，其中日期所在的列是动态在变化，如何选取这一行中最右边的日期，如

　　　　　 第1列　　 　第2列　　　　 第3列　
第2行　　　2010-01-15 2010-02-07 2010-03-05

需读取最右边的日期 2010-03-05，注意日期的填充是不断变化的

------解决方案--------------------------------------------------------

VB code

Sub test()    Dim rng As Range    Set rng = ActiveSheet.Range("A2")        While rng.End(xlToRight).Value <> ""        Set rng = rng.End(xlToRight)    Wend        Debug.Print rng.Address    End Sub