Sayfa sonuna Toplam almak

Katılım
6 Temmuz 2004
Mesajlar
157
Excel Vers. ve Dili
Microsoft® Office 2019 TR
Arkadaşlar uzunca bir stok listesi var
Bunun yazıcıdan cıkarken o sayfaya ait toplamını almak istiyorum
bunu yapmak için makro mu kullanılacak.
Nasıl olacağına ilgili bir örnek verirseniz sevinirim
 
Katılım
28 Şubat 2005
Mesajlar
707
Excel Vers. ve Dili
office 2007 (excel2007)English işte
office 2003 (excel2003)
Türkçe evde
merhaba;
bu toplam listede "kaç adet stok kodu var" mı olacak yoksa stok kodlarına girilen fiyatlarımı toplayacak :)
 
Katılım
6 Temmuz 2004
Mesajlar
157
Excel Vers. ve Dili
Microsoft® Office 2019 TR
Sn birol mumcu Fiyatların toplamı başka bir listede
Birm miktarlarınının toplamını alacağım
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Başka bir yol ilede yapılabilir belki ama ben size makrolu bir çözüm öneriyorum. Aşağıdaki kodu çıktısını alacağınız sayfanın kod sayfasına yazın. Sayfa üzerinde toplamını alacağınız değerleri yazdırma alanının dışında kalan bir hücrede toplatın. Bu hücreyi aşağıdaki makrodaki [a18] yazan yere yazın. Bu durumda örneğin [a18] hücresindeki değer özet alt bilgi olarak sayfanızda görünecektir.
[vb:1:80358b7ff1]Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.PageSetup.CenterFooter = [a18]
End Sub
[/vb:1:80358b7ff1]
 
Katılım
6 Temmuz 2004
Mesajlar
157
Excel Vers. ve Dili
Microsoft® Office 2019 TR
Sayın levent bey
Ã?ncelikle teşekkür ederim
Sayfa sonuna o sayfanın toplamını altırmak istiyorum
En son sayfada ise genel toplam şudur şeklinde bir yazı yazmasını istiyorum.

Stoklardan acımışken konu Bir sorum daha ocaktı aşağıda ki soruma tam olarak cevap alamadım
http://www.excel.web.tr/viewtopic.php?t=2598&highlight=
yardımlarını bekliyorum

Stok kartımın bir örneğini ekte gönderiyorum
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
Worksheets("sayfanızınadı").Select
Dim SonHucre As Range
Set SonHucre = Range("A65536").End(xlUp)
'T O P L A M A L***************
SonHucre(2, 3) = "T O P L A M "
SonHucre(2, 5).Formula = "=SUM(e2:e" & SonHucre.Row & ")"

AÇIKLAMA
SonHucre(2, 3): 2 son dolu hücrenin bir altındaki satır, 3 son dolu ücrenin 3 sağındaki satır (yani C)

BU İÞİNİZİ görüür sanırım
 
Katılım
6 Temmuz 2004
Mesajlar
157
Excel Vers. ve Dili
Microsoft® Office 2019 TR
Sn hsayar
bu makroyu çalıştıramadım
örnek bir dosyada gönderirseniz sevinirim
Teşekkür ederim
:oops:
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
:hey: sayın evren_01 buraya ya örnek dosya ekleyiniz yada toplam alınacak sütunu ve kaçıncı satırdab başlayacağını söylermesiniz

3. satırdan itibaren C kolonunu toplamak istiyorum yada
3. satırdan itibaren C,D,E,F kolonunu toplamak istiyorum gibi :)
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Ã?rnek dosya yukarıda eklidir.
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
Selam Dosya eklidir. Butona basıyorsunuz ve toplamı alıyor, hatta yazdırma alanını belirliyor ve kenarlık yapıyor :D
Sorunuzdan anladığım kadarıyla cevap verdim.
İyi çalışmalar
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
Bu da Dosya
 
Üst