Macro to create box gridline where there is data

Hello all,
I am looking to create black gridlines around all the cells that I have actual data in (without creating the gridlines on the blank cells).

Is there a way to do this?

Thanks!
Bryan

conditional formatting (see attached)

=NOT(ISBLANK(A1))

to set that up (started on cell A1)

1) highlight cell A1
2) go to Home tab ->Conditional Formatting
3) select "new rule" --> use a formula option
4) =NOT(ISBLANK(A1)) in the rule box
5) click format button, set the borders you want
6) when done click OK to exit and copy / past the formats to other cells.