Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
10/05/2012 18:24
Konu Sahibi
kokotuna
Yorumlar
4
Okunma
1840
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

kokotuna

Aktif Üye
Kullanici Avatari
Aktif Üye
202
02/03/2012
10
Bolu
Ofis 2010
01/06/2017,09:32
Çözüldü 
Merhaba arkadaşlar excelde
=1,67*LOG(15000/(D30*D24))
formülü ile hesaplanan değeri acsess te aynı şekilde hesaplatmak için kodu nasıl yazmalıyım?
Bir çok kombinasyon denedim ancak sonuçlar hiç tutmadı Img-grin

Bu acemiye yardım ettiğiniz şimdiden teşekkürler...


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 

Kod:
Static Function Log10(X)
    Log10 = Log(X) / Log(10#)
End Function


Kod:
Dim MyAngle, MyLog
' Define angle in radians.
MyAngle = 1.3
' Calculate inverse hyperbolic sine.
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))


@benbendedeilem
Cevapla

kokotuna

Aktif Üye
Kullanici Avatari
Aktif Üye
202
02/03/2012
10
Bolu
Ofis 2010
01/06/2017,09:32
Çözüldü 
D30=1.86 , D24=316 olduğunda excelin verdiği sonuç 2,34 ancak burda verdiğiniz kodlarla hesaplattığımda sonuç 5.4 çıkıyor sanırım Dim kodunu yanlış yere kopyalamış olabilirim o kod nereye yazılmalı ?


Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.863
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,10:37
Çözüldü 
accessman'ın verdiği

Visual Basic Code
Static Function Log10(X)
    Log10 = Log(X) / Log(10#)
End Function

kodu vb sayfasına yapıştır.

Visual Basic Code
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))

olarak verilen kodu

Visual Basic Code
MyLog = Log10(MyAngle + Sqr(MyAngle * MyAngle + 1))

şeklinde kullan, sizin kodunuza göre;

Visual Basic Code
MyLog = 1.67 * Log10(15000 / (1.86 * 316))


Cevapla

kokotuna

Aktif Üye
Kullanici Avatari
Aktif Üye
202
02/03/2012
10
Bolu
Ofis 2010
01/06/2017,09:32
Çözüldü 
teşekkürler sorun çözülmüştür.


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Sorguda İlk 9 Karakter Alma blumanx 2 157 27/09/2017, 23:22 blumanx
Çözüldü Satın Alma Takip Te Yöneticilere Onaylatma mahsumyavuz 2 156 24/08/2017, 12:15 mahsumyavuz
Çözüldü Web Browserdeki Checkbox Değerini Alma idrisy 4 247 31/07/2017, 23:33 ozanakkaya
Çözüldü Açılır Kutudaki Değeri Alma Sorunu derzulya 5 241 11/07/2017, 16:08 derzulya
Çözüldü Access Den Excel Çıktısı Alma Sorunu estapan 13 953 30/05/2017, 14:12 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.