Format date within formula in VBA

[JenaB]

.Range("P2").Resize(r.Rows.Count - 1, 1).Formula = "=TEXT(A2,""yyyymmdd"")&""-""&E2&""-""&O2"
[/CODE]

Paul_Hossler, your suggestions were INCREDIBLY helpful. Really, I learned so much by your notes and re-work on my codes. So that it is in my preferred format I rearranged the date format and removed the hyphens and get this code ("=TEXT(A2,""mmddyyyy"")&E2&O2") to work perfectly. Thank you so much!!