• DİKKAT

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

sY.Name = c.Value

Katılım
12 Şubat 2019
Mesajlar
56
Excel Vers. ve Dili
2016 Türkçe
Projemin En Yapılamaz Kısımları Bitmek Üzere

Şöyle bir hata alıyorum bu neden kaynaklanıyor?

Hata alıyorum... Debug kısmına baktığımda hata veren kısım: sY.Name = c.Value bu nedne olabilir değer eksik olduğunu biliyorum ama bunu bulamıyorum.

Birde veri sayfasında işlem 3.Modül çalıştırıldığında.
 

Ekli dosyalar

Merhaba.

For Each c In Range("W2:W" & r) yazmışsınız ama sayfa adı belirtmemişsiniz. Bu hali ile aktif olan sayfaya bakıyor.
Aktif sayfada belirtilen aralık boş olduğundan hata veriyor.

Kod şöyle olmalı.
For Each c In ThisWorkbook.Worksheets("Sayfa Adını buraya yazmalısınız").Range("W2:W" & r)

Diğer soruyu anlayamadım Veri sayfasında İşlem 3. Modül diye bir şey bulamadım.
 
Merhaba.

For Each c In Range("W2:W" & r) yazmışsınız ama sayfa adı belirtmemişsiniz. Bu hali ile aktif olan sayfaya bakıyor.
Aktif sayfada belirtilen aralık boş olduğundan hata veriyor.

Kod şöyle olmalı.
For Each c In ThisWorkbook.Worksheets("Sayfa Adını buraya yazmalısınız").Range("W2:W" & r)

Diğer soruyu anlayamadım Veri sayfasında İşlem 3. Modül diye bir şey bulamadım.

Bu şekilde olmayacak sanırım sayfa yapısını basitleştirmem gerekiyor.
 
For Each c In Range("W2:W" & r)
bu alanda c değer almıyor. Range("W2:W" & r) değeri hangi sayfada. Range ifadesinin başına s1 veya s2 yazmanız gerekli.
 
Zaten yazılan kodda s1,s2 tanımlaması yapılmış. Kodlar içerisinde range ya da cells geçen kelimelerin başına hangi sayfadan veri alınacak ya da işlem yapılacaksa o sayfa ismini almanız gerekir.
 
Bildiğim kadar hayır.Excelde kod yazacaksanız vba kullanmalısınız.:cool:
Vs de kullanabilirsiniz.
 
Geri
Üst