cant i just add on to this. i tried rcording a macro then copy and
paste the code to here and it wouldnt work.

Sheet12.Range("A9:D1000").Select
Selection.Clear
Selection.WrapText = True