custom date format in vba 1

[vba317]

I have to format individual columns I am having a problem with setting the format to date. Any help would be appreciated. I get a compile error on the format function

With wb.Worksheets("Sheet1").Columns(2)
        .Font.Bold = False
        .Font.Size = 10
        .VerticalAlignment = xlCenter
        .ColumnWidth = 9
    [Red]    .Format= (Date, "mmyyyy")[/Red]
    End With

 

[PHV]

.NumberFormat = "mmyyyy"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886