Thanks for the reply, it help me out. Problem is solved.

"Normek" wrote:

Hi caldog,
Try Selection.ClearContents, that way you won't have to reformat.
Otherwise if you wish to continue as you are just record a macro of youself
doing the formatting and run that.

"caldog" wrote:

I have code that clears certain data, when I click on a button, the coding is
"Selection.Delete Shift:=xlUp".

I then want to be be able to re-establish my borders, my word font type, and
word font size, by way of some VBA coding.

I have struggled with the For-Next Loop coding, but alas all of the cells
remain blank after going through through the For-Next routine.

I'm sure there is a simple coding for this, but I sure have found it as of
yet.

Thanks for reading