zamana bağlı veri alma

[h19k69]

sevgili arkadaşlar ,
ekteki excel dosyasında bulunan a2 hücresindeki 1 sn ara ile değişen veriyi
f2:f62 hücrelerine 1 er saniye ara ile yazdırıp g2 hücresinde bunun ortalamasını bulmak istiyorum yardımcı olursanız sevinirim.

 

[Korhan Ayhan]

Selamlar,

Bu işlemin çok sağlıklı olduğunu düşünmüyorum. Çünkü 1 saniye aralıkla kodlama çalışacağı için dosya üzerinde çalışmanız engellenecektir. Ama fikir vermesi açısından aşağıdaki kodu kullanabilirsiniz. Kodu uyguladıktan sonra dosyanızı kapatıp açın.

Sorunuzun ikinci kısmını tam olarak anlamadım. G2 hücresine hangi aralığın ortalamasını almak istiyorsunuz.

Sub AUTO_OPEN()
    Application.Wait Now + TimeValue("00:00:01")
    KOPYALA
End Sub

Sub KOPYALA()
    [F2:F62].Value = [A2].Value
    AUTO_OPEN
End Sub

 

[h19k69]

cevap

sorumu tam olarak anlamadığımı hissediyorum.
application.wait kullandığımızda excelde duruyor.

bu excel dosyası başka bir endüstriyel ölçüm cihazından devamlı değişen veriler alıyor.
ben bunun datalarını toplamak istiyorum.
bunun içinde dakikalık ortalama almak istiyorum.
a2 deki verileri birer saniye ara ile f2:f62 hücrelerine yazdırmak istiyorum ki
bu 60 adet verinin ortalamasını alabileyim.
bunu ietimer kullanarak nasıl yapabilirim.