Koşula göre en büyük değeri getirmesi

[Lecay]

malesef Korhan bey. bu seferde farklı shipmentlarda kod çalışmıyor.

 

[Korhan Ayhan]

"B" sütununa veri girişi yapıp deneyin. Ben kodu "B" sütunundaki dolu satıra göre kurgulamıştım.

Eğer bu sütunun boş olma durumu varsa kod içindeki aşağıdaki satırı bulun ve bold olan değeri 4 olarak düzenleyin.

Son_A = S1.Cells(S1.Rows.Count, 2).End(3).Row