Excel Macro - How to make whole column always Today's date

[Gomes1985]

Hi All,

Background - I have 2 Excel Files A and B

I manually copy all data from File A to B exact copy.

I am Reading from File B only ( dont ask why not read from A as its a process) B

After I copy the data to File I Read Line by line to a Sessions Screen to do that I need to make all cells text. Done using

Sheets("sheet1").Select
Cells.Select
Selection.NumberFormat = "@"

Issue -As soon as above code is read Column N in File B changes todays date 01072016 changes to

42552

<tbody>
</tbody>

Other dates dont change because there is no formula only this column in File B chnages because of the =TODAY() formula

Because of that Sessions Screen rejects the input.

Solution - My opinion to go around it after I run

Sheets("sheet1").Select
Cells.Select
Selection.NumberFormat = "@"

I want to ran another code

make column N always this format today 01072016

Does any one can tell how would I can make a whole column like that or any other better way?

Thank you

 

[wideboydixon]

Sheets("sheet1").Cells.NumberFormat = "@"
Sheets("sheet1").Columns(14).NumberFormat = "ddmmyyyy"

WBD

 

[mole999]

change
Selection.NumberFormat = "@"
to
Selection.NumberFormat = "ddmmyyyy"

 

[Gomes1985]

Thanks WideBoydixon,

Works like a charm