• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Yardım #DEĞER hatası

incsoft

Yeni Üye
Katılım
28 Ocak 2019
Mesajlar
234
En iyi yanıt
0
Puanları
18
Yaş
42
Konum
Ankara
Ad Soyad
Ufuk İNCE
Office Vers.
Office 2019 Professional
=ay_uretim_adeti(E2)

Bu komutla aşağıdaki fonksiyona göre belirtilen hücredeki siparişi sayfada bulunan 31 günlük yerden buldurarak toplamını aldırıyorum arkadaşlar ancak çoğu bilgisayarda sorunsuz çalışırken server üzerinden çalışan office sürümlerinde #DEĞER hatası vermektedir. Sizce neden olabilir?

Teşekkürler.



Option Explicit

Public Function ay_uretim_adeti(ie_no As Long) As Long
', Optional VolatileParameter As Variant
ActiveWorkbook.ForceFullCalculation = True
Dim hesap As Long
Dim i, j As Integer

For i = 1 To Sheets.Count

For j = 2 To 50 'yukarıdan aşağıya 50 satıra bakacak

If Sheets(i).Range("E" & j).Value = ie_no Then

hesap = hesap + Sheets(i).Range("F" & j).Value

End If

Next j

Next i

ay_uretim_adeti = hesap
End Function
 

leguminosea

Yeni Üye
Katılım
26 Ocak 2020
Mesajlar
89
En iyi yanıt
5
Puanları
18
Konum
Tokat
Ad Soyad
Erhan ÖZER
Office Vers.
2019 Pro Plus 64 TR
Bu bir KTF (kullanıcı tanımlı fonksiyon).
Muhtemelen Server üzerindeki bilgisayarların excell uygulama kütüphanesinde bu özel fonsiyon bulunmadığından çalışmıyor.
Bunu nasıl tanımlayacağınızla ilgili internette arama yapınız.
Bir çok kaynak bulacaksınız.
 

incsoft

Yeni Üye
Katılım
28 Ocak 2019
Mesajlar
234
En iyi yanıt
0
Puanları
18
Yaş
42
Konum
Ankara
Ad Soyad
Ufuk İNCE
Office Vers.
Office 2019 Professional
Bu bir KTF (kullanıcı tanımlı fonksiyon).
Muhtemelen Server üzerindeki bilgisayarların excell uygulama kütüphanesinde bu özel fonsiyon bulunmadığından çalışmıyor.
Bunu nasıl tanımlayacağınızla ilgili internette arama yapınız.
Bir çok kaynak bulacaksınız.

Bunu çözdüm hocam.. Kullanıcı tanımlı fonksiyonla ilgili size 1 soru sorabilirmiyim? Burda fonksiyona bir kod eklentisi yaparak sadece belirtilen sayfalardan toplam almasını sağlayabilirmiyiz? Mesela 1-2-3....31 ve ismi DATA olan sayfalardan alması yönünde...
 

leguminosea

Yeni Üye
Katılım
26 Ocak 2020
Mesajlar
89
En iyi yanıt
5
Puanları
18
Konum
Tokat
Ad Soyad
Erhan ÖZER
Office Vers.
2019 Pro Plus 64 TR
Alttaki gibi dener misiniz?

Kod:
Option Explicit
Public Function ay_uretim_adeti(ie_no As Long) As Long
', Optional VolatileParameter As Variant
ActiveWorkbook.ForceFullCalculation = True
Dim hesap As Long
Dim i, j As Integer

For i = 1 To 31
    For j = 2 To 50 'yukarıdan aşağıya 50 satıra bakacak
        If Sheets(i).Range("E" & j).Value = ie_no Then
            hesap = hesap + Sheets(i).Range("F" & j).Value + Sheets("DATA").Range("F" & j).Value
        End If
    Next j
Next i

ay_uretim_adeti = hesap
End Function
 
Üst Alt