• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel de yapılan işlemin sonuçlarını bir veri tabanında ya da herhangi bir yerde saklama

  • Konbuyu başlatan Konbuyu başlatan a7per
  • Başlangıç tarihi Başlangıç tarihi
Katılım
25 Temmuz 2012
Mesajlar
12
Excel Vers. ve Dili
2007
Arkadaşlar problemim şu; excel de basik çarpma işlemi yaptıracağım. Örneğin X=1 Y=5 SONUÇ=1*5=5
fakat her seferinde en azından Y değişkeni değişecek ve her işlemde ayrı ayrı sonuçlar bulacağım. bulduğum bu her sonucun bir yere gitmesini ve orada toplanmasını istiyorum. örneğin ilk işlem sonucum 2, ikincisi 3, üçüncüsü 6 diyelim ben yaptığım işlemleri belki unutsamda 2+3+6= 11 sonucunu görmek istiyorum. Umarım kendimi ifade edebilmişimdir. Örnek dosya çalışma vs varsa yollarsanız sevinirim.
 
X değeri A7 Hücresi,Y Değeri A8 Hücresi ve A8 hücresini değiştirdiğinizde işlem yapar.C4 sütundan itibaren kayıt eder ve toplar.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
   If Intersect(Target, Range("a8")) Is Nothing Then Exit Sub
  son = Cells(65355, "C").End(3).Row + 1
 If son = 4 Then
Cells(son, 3) = [a7] * [a8]
Cells(son + 1, 3) = WorksheetFunction.Sum(Range(Cells(4, 3), Cells(son, 3)))
Else
Cells(son - 1, 3) = [a7] * [a8]
Cells(son, 3) = WorksheetFunction.Sum(Range(Cells(4, 3), Cells(son, 3)))
End If
End Sub
 
Son düzenleme:
Çok teşekkür ederim. Ancak bu kodu excel de adım adım nereye ekleyeceğimi söylerseniz çok sevinirim. visual basic gibi bişeyler çıkıyor ama yapıştıracak yeri bulamadım. Tekrar çok teşekkürler
 
1) Bir excel dosyası açınız.
2) Yazdığım kodu kopyalayınız.
3)Altta sayfa isimlerinin yazdığı sekmede fare sağ tuş,tıklayınız.
4)Çıkan seçeneklerde Kod görüntüle seçeneğiniz.
5)Çıkan sağdaki boş alanda fare sağ tuş tıklayınız ve kodu yapıştırınız.
6)A1 ve A2 hücrelereine sayı giriniz.A2 hücresine sayı girdikçe işlem yapaçaktır.
7)Kayıt ederken Makro içerebilen excel çalışma kitabı olarak kaydediniz.
Kolay gelsin.
 
Son düzenleme:
microsoft basic for aplication diye bir panel açılıyor solda menü var VBAProject (dosyamın adı) diye bir şey var ama sağ taraf komple gri. sağ tıklayıp yapıştır diye bir seçenek vermiyor. sağ tıklattırmıyor sağ taraftaki boş gri alan
 
Edit 7. maddeyi uygulamamışım kaydederken. Sizden son birşey rica edecektim. A1 A2 şeklinde çok güzel açıklamışsınız ya, yeni eklemeli sonuç ve yapılan işlemlerin toplamını B1, B2 değil de benim istediğim hücrelerde görünecek şekilde yapabilmem için kodu düzenlemeniz mümkün mü? misal ben A2 dediğiniz yere A8 yazdım sorunsuz çalıştı. Ancak her işlem sonucu ve total toplamı şu hücrelerden itibaren yap şeklinde yapmayı çok isterim. misal C3 de başlık var GELİRLER diye altında C4 C5 C6 ..... diye ata ata ilerletebilmek için mesela. çok teşekkür ederim.
 
Çok teşekkür ederim. Ellerinize sağlık
Rica ederim.Dönüş yaptığınız için teşekkür ederim.
Resim1 de Taşı ve kopyala seçili görünüyor.Kod görüntüle seçileçek
 
Geri
Üst