Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.
Arıyorum, bulunca paylaşacağım.Ekli dosyayı görüntüle 12198
Evet düzelmektetir ama kod olarka nasıl ilerlemem gereklidir.
Dolu hücrelerde dolaş demek abey b ve d sütunlarında.Alan ise hangisi doluysa o oluyor abey.Anlatımım genelde iyi değil.hocam buradaki )(.Range(For Each Alan In Sheets("Sayfa1").Range("B2:D" & Rows.Count).SpecialCells(xlCellTypeConstants) ) rows.count sonunu bulmu demek?
If Alan.Value <> ""