(19/12/2023, 23:53)feraz yazdı:

(19/12/2023, 13:37)hnakis yazdı: 6. örnekteki çalışmaya gr / lt sütunu eklemeye çalıştım. Sub W_V_Getir(ByVal syf As Worksheet) gibi G_L getir şeklinde ama bir yerde hata veriyor bulamadım. w/v * 10 olarak hesaplayacak. ama neden hata aldığımı bulamadım.

Sayın abey resimdeki gibi type olarak tanımlamalar yaptım.
Yapmamdaki amaç const ile yaptığımızda  düzensizlik oluyordu.
Const yerine bunu kullandım.

bulW_W = satirNo(satirlar.W_W, syf) örneğin bu şekilde yazınca satirlar.W_W  sonucu w / w olarak atadığımız için böyle arar.
Amaç sadeleştirmek  valla iş karıştı ama denemelerimde doğru sonuçlar geldi.
Dediğinizi hatayı bulmak için yine yeniden yazayım yeni konu açın durmadan konu dağılıyor.
Kodları inceleyin biraz.
satirlar bir modüle sub ekleyip yandakini yazın ve noktaya tıklayın type içindekiler çıkması gerek bu şekilde değişken eklemek için type içine ekleyebilirsiniz.

---

Mantığı daha iyi anlamnız için mesela alttaki gibi yapıp kodu çalıştırın sonuç ne çıkacak gözlemleyin.

Kod:

Sub test()
    MsgBox satirlar.Ekgider
End Sub

sayın feraz o şekilde yaparak kodları anlamaya çalışıyorum. öğrencem inşallah yeni çalışma için teşekküre ederim. elinize sağlık.

saygılar