sağa yaslamak için boşluk kullanıldığı için Nz() işe yaramamış kodu aşağıdaki gibi düzenleyip dener misiniz

listİskonto = listİskonto + Val(ctl.Column(4, I))

listKDV = listKDV + Val(ctl.Column(5, I))

listGenel = listGenel + Val(ctl.Column(6, I))

listbirim = listbirim + Val(ctl.Column(3, I))