• DİKKAT

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

Verilen satırda belirli bir alanda veri bulunduğunu kontrol etmek

Katılım
12 Eylül 2020
Mesajlar
176
Excel Vers. ve Dili
365 ev
İyi günler öncelikle , bir algoritmanın çalışmasını başlatmadan önce , bu algoritmanın başlaması için gerekli şartlar sağlanmış mı diye kontrol etmek istiyorum. Bu kontrolü yaparken de kullanıcının textbox a girdiği sayıyı i. satır olarak alıp i. satırda belirli bir alanın dolu olup olmadığını kontrol etmek istiyorum bu belirli alanın başlangıç noktası sabit fakat bitiş noktası değişken. Nasıl yapabilirim
 
Merhaba,

İlgili alanda koşulun varlığını kontrol etmek için;

Tek koşulsa (COUNTIF-EĞERSAY) ya da (FIND-BUL) ile yapabilirsiniz.
Birden fazla koşulsa (ÇOKEĞERSAY-COUNTIFS) ya da (TOPLA.ÇARPIM-SUMPRODUCT) ile yapabilirsiniz.

Forumda bunlarla ilgili bolca örnekler var. Arama yaparsanız ulaşabilirsiniz.
 
Merhaba,

İlgili alanda koşulun varlığını kontrol etmek için;

Tek koşulsa (COUNTIF-EĞERSAY) ya da (FIND-BUL) ile yapabilirsiniz.
Birden fazla koşulsa (ÇOKEĞERSAY-COUNTIFS) ya da (TOPLA.ÇARPIM-SUMPRODUCT) ile yapabilirsiniz.

Forumda bunlarla ilgili bolca örnekler var. Arama yaparsanız ulaşabilirsiniz.
vba tarafında kod oluşturucam
i olarak bir sayı vereceğim ve bu i yı satır olarak tanıtıp bu satırda misal B2 den başlayarak Bx e kadar gidecek x değişken
 
Aşağıdaki gibi kurgulayabilirsiniz.

Range("B2:B" & X)
 
Hocam peki bu koşul oluşturduğunda bir hata mesajı gösteriyorum ve bu hata mesajı çıkarsa command butondaki diğer atanmış algoritmaları çalıştırmamasını istiyorum nasıl yapabilirim?
 
Hata mesajı çıktıktan sonra Go To komutu ile makroyu istediğiniz bölüme yönlendirebilirsiniz. Ya da Call Makro Adı şeklinde kod çağırabilirsiniz.
 

command butonun içi bu şekilde iken call makrolardan önce bu durumu kontrol etmek istiyorum eğer hata b = 0 sa devam , değilse durdurup uyarı mesajı çıksın şeklinde nasıl yaparım ?
 
Deneyiniz.

C++:
If b = 0 Then
   Go To 10
Else
   UserForm1.Show
   Exit Sub
End If

10
Call isimleralg
 
Hocam hata mesajı verdirmeme rağmen call fonksiyonları çalışmaya devam etti
 
Burada şunu dedik...

Eğer b sıfıra eşitse diğer makroları çalıştır.
Eğer b sıfıra eşit değilse UserForm1 nesnesini aç ve işlemden çık.
 
Bu durumda örnek dosyanızı paylaşın kontrol edelim.
 
Siz benim önerimi tam olarak uyguladığınıza emin misiniz?
 
hocam 0 a eşitse hata vermesi gerekiyor, eğer 0 dan büyükse devam etmesi gerekiyor, debug hatası alıyorum call fonksiyonu hala çalışıyor demek ki
 
Paylaştığınız dosyada EXIT SUB satırını kullanmamışsınız. Bunu eklemeniz gerekir.
 
tamamdır hocam, dediğiniz gibi yapınca makrolar durdu
 
Geri
Üst