Excelde Yer DeĞİŞtİrme Butonu

[darjeling]

Merhabalar akaryakıt istasyonu için bir program yaptım kendi çapımda her akşam ilk total ve son total yazıyoruz otomatik sondan ilki çıkarıp birim fiyatı ile çarpıp parayı hesaplıyor ve kaydet deyip çıkıyoruz fakat ilk totali bi yere yazmıyoruz o yüzden dolayı bir buton yapmak istiyorum butona tıklayınca ilk totali silecek ve son totali oraya taşıyacak örnek resim aşağıda

 

[Halit TÜRK]

Selamlar,

Aşağıdaki kodu deneyiniz..

Sub Total()
    Range("B2:B3").Value = Range("C2:C3").Value
    Range("B5:B8").Value = Range("C5:C8").Value
    Range("C2").Select
End Sub

 

[darjeling]

hocam o kod ile ilk total son total oldu ve son total kısmı silinmedi

 

[Halit TÜRK]

Sub Total()
    Range("B2:B3").Value = Range("C2:C3").Value
    Range("B5:B8").Value = Range("C5:C8").Value
    Range("C2:C3,C5:C8").Value = 0
End Sub

 

[darjeling]

çok sağol ustam eline sağlık allah razı olsun

 

[darjeling]

Programımız sonunda bitti htrk abime yardımlarından dolayı çok tşk ediriyorum
dosya ektedir belki diğer arkadaşların işine yarar