berkem13
Altın Üye
- Katılım
- 9 Nisan 2020
- Mesajlar
- 39
- Excel Vers. ve Dili
- Excel 2007 ve 2016
- Altın Üyelik Bitiş Tarihi
- 27-04-2025
Merhabalar resimdeki çalışmamda "Kilogram" ve "Birim Fiyat"tan "Genel Toplam"ı bulmam gerekiyor. Diğer değişkenleri etkilememesi için bunu formülle yapmak yerine vba ile yapmam gerekiyor. Yazdığım kodda da görüleceği üzere değişkene sadece bir hücre atayabiliyorum. 50. Satırdan 67. satıra kadar bu kodu nasıl tekrarlayabilirim? KG ve Birim Fiyat hücreleri boş olduğunda kodun çalışmaya devam etmesini nasıl sağlarım? Şimdiden yapacağınız yardımlardan dolayı teşekkür ederim.
Kod:
Sub TevkifatlıFaturaHesaplama()
'
' FaturaHesaplama Makro
'
' Değişken Atama
Dim KDVsiz, KDV, TEVKİFAT, GENELTOPLAM As Variant
KDVsiz = Range("E50") * Range("F50")
KDV = KDVsiz * 0.18
TEVKİFAT = KDV * 0.2
GENELTOPLAM = KDVsiz + TEVKİFAT
' İşlem Yaptırma
Range("I50").Value = KDVsiz
Range("J50").Value = KDV
Range("K50").Value = TEVKİFAT
Range("L50").Value = GENELTOPLAM
End Sub
