vba ile matematik işlemleri

Merhaba =(H2-D2)/H2 bu formülü sayfada vba olarak 500 satırda çalıştırmak istiyorum yani alta bütün satılarda otomatik olarak bu hesaplamayı yapmasını istiyorum çıkan sonucuda yüzde olarak vermesini istiyorum yardımcı olursanız teşekkürler