Excel VBA macro that calculates the coverage area in square meters or square kilometers

Does anyone have an Excel VBA macro that calculates the coverage area in square meters or square kilometers?