Macro ile cari bakiye.

[unalh]

S.a Arkadaşlar.






Borç alacak ve bakiye listesi mevcut. Bakiye durumu boş.

aşağıdaki formül sonuçları veriyor fakat bunu bir butona atamak ve cari kod bölümünden seçtiğim kodun işlem sayısı kadar kadar uygulaması gerekiyor.

Birde formül ile değilde macro ile yapmak mümkünmüdür ?


ActiveCell.FormulaR1C1 = "=RC[-2]-RC[-1]"
Range("K4").Select
ActiveCell.FormulaR1C1 = "=RC[-2]-RC[-1]+R[-1]C"

 

[ilkersan]

merhaba,
Soruyu yanlış anlamadıysam,örnek bir dosya ekliyorum.( kendi çapımda biraz makro biraz formül)
Belki işinizi görebilir.

 

[ilkersan]

Bu dosyada daha önceden forumdan bulduğum daha gelişmiş bir örnektir.

 

[unalh]

ilkersan ilgine teşekkür ederim sanırım ben tam anlatamadım.

Eklediğim dosyada bakiye butonuna basınca borç ve alacak işlemini yapıyor bakiye kısmına kalan sonucu yazıyor.

Bir çözüm ürettim fakat biraz uzun bunu daha kısa ve en önemlisi hareket sayısına uyarlamak gerekiyor.

Bunu nasıl yapabiliriz.


Teşekkür ederim