VBA version of =TODAY()

[ipbr21054]

Hi,
I am using this code below but i would like to also add the current date when its run.
+TODAY() isnt correct so please can you advise how its done.

Private Sub Imageline_Click()Rows("6:6").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A6").Select
Range("A6:P6").Borders.LineStyle = xlContinuous
Range("A6:P6").Borders.Weight = xlThin
Range("A6:P6").Interior.ColorIndex = 6
End Sub

Thanks

 

[snjpverma]

today() version for vba is Date

 

[ipbr21054]

Thanks but how do i write it so i can add to my existing code.

Range("M6")Date

???

Thanks

 

[ipbr21054]

Got it now thanks