Veri Listelerken Sıra Numarası Verme

[YasarPiskin]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

DATA sayfası J ve ER sütunlarından herhangi bir hücreye çift tıkladığımızda istenilen bilgileri LİSTE sayfasına aktaran mevcut kodu LİSTE sayfası B sütunu sıra numarasını aşağı doğru sıralayacak şekilde iyileştirilmesi hususunda yardımlarınızı rica ediyorum.

 

[Ömer BARAN]

-- Kodda yer alan; Sayfa4.Range("B4:I" & Rows.Count).ClearContents satırındaki B4 kısmını A4 olarak değiştirin.
-- Koddaki If .Cells(satt, Target.Column) = Target.Value Then satırının hemen altına şu satırı ekleyin
Sayfa4.Cells(lsat, 2) = satt - 3: Sayfa4.Cells(lsat, 2).NumberFormat = "0 ""- """

 

[YasarPiskin]

Değişiklikleri yaptım fakat sıralama sıralı olarak yapılmıyor. 4 ten sonra 8 e geçiyor.

 

[Ömer BARAN]

satt - 3 değil de lsat - 3 yapın.

 

[YasarPiskin]

Çok teşekkür ederim.