How to change number of decimal places in already calculated value.

Alright, I have hit a snag in a short macro I am trying to make. I am taking an average of a range of numbers and then putting it into a cell.
When the average is calculated it only shows up with 2 sig figs. For example 29 instead of 29.3459.

The code I am using simplified looks like this.

Please Login or Register  to view this content.

I'm sure this is a stupid way to do it, but having no previous knowledge this is the best I could come up with.

The result I am getting however gives me a result of 94.0000 instead of 93.6738.

Thanks for the help!