• DİKKAT

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

Eski Göstergeden Yeni gösterge arasında ki fark

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,543
Excel Vers. ve Dili
2021 LTSC TR
Değerli abilerim
Ekli dosyada açıklama yapmışımdır.
Değişiklik Gösterge artış yaparsa formül devreye girecek yoksa pasif kalacak

Yardımcı olurmusunuz Teşekkür ederim
 

Ekli dosyalar

şu kodu sayfa1 in kod kısmına kopyalayıp denermisiniz..

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, Range("m8:m1000")) Is Nothing Then Exit Sub
If Target <> "" And Target <> Target.Offset(-1, 0) Then
Target.Offset(0, 2) = (Target - Target.Offset(-1, 0)) * Target.Offset(-1, -10) / 1000000
End If
End Sub
 
üstad yada o9 hücresine şu formülü kopyalayıp aşağıya çekin..bu daha basit bir çözüm olur..:)

=EĞER(M9<>M8;(M9-M8)*C8/1000000;"")
 
Sayın apocalyt
Her iki mesajınız için teşekkür ederim.
Çok çok sağol
 
Geri
Üst