Paste special

[dpaton05]

Is there a paste special property for the pasted text to be only a date, without formatting, such as background etc.

I have:

With Worksheets(Combo).Cells(Lastrow, 1)
        .PasteSpecial Paste:=xlPasteValues
        .PasteSpecial Paste:=xlPasteFormats
    End With

but it copies formatting and if I remove the last line, it writes a strange number that is nothing like a date. I don't want it to copy the formatting though. Is there a way to do this?

 

[dpaton05]

Thanks. One more thing, I have just been told that the reporting month goes from between the 26^th of the previous month to the 25^th of the current month. I am not sure what to do to differentiate what month the costing must go in.

The way I have it, it selects the month based on the month of the date. I am not sure how to get it to identify the correct month using this though. Would you be able to help please?

 

[MARK858]

I am sure you have already asked this in another thread. Please don't duplicate questions.

As for the Cells you do realise that the syntax for the column takes either the column letter or the column number so you could do

    With Worksheets(Combo).Cells(Lastrow, "J")
        .PasteSpecial Paste:=xlPasteValues
        .NumberFormat = "$#,##0.00;[Red]$#,##0.00"
    End With

if that is easier for you.

Going to get some sleep now.

 

[dpaton05]

Well thank you and sorry if I doubled up on questions. I haven't got a good memory and I forget things easily.