selam arkadaşlar.
B sutununda bulunan sayılardan son altı tanesinin toplamınaltıya bölümünden çıkan sonucu textbox a nasıl alırım. makrosunu bir türlü bulamadım. saygılar
Private Sub CommandButton1_Click()
son = [b65536].End(3).Row
If son <= 6 Then
topla = WorksheetFunction.Sum(Range("b1" & ":" & "b" & son))
Else
topla = WorksheetFunction.Sum(Range("b" & son - 5 & ":" & "b" & son))
End If
TextBox1 = topla/6
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.