• DİKKAT !

    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.

Çözüldü Dolu Hücreleri Seçip Sıralama

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

bulentkars

Yeni Üye
Katılım
30 May 2022
Mesajlar
605
Çözümler
5
Aldığı beğeni
103
Excel V
Office 365 TR
Konu Sahibi
Arkadaşlar Merhaba,

Aşağıdaki koda bir ilave yapmak istiyorum. makroyu çalıştırdığımda a1:den itibaren sağa doğru dolu hücreyi seçecek aynı şekilde en alttaki en son satırın bir üstüne çıkacak sonra B sutununa göre verileri sıralamak istiyorum. Yardımcı olabilirseniz sevinirim. Şimdiden Teşekkürler


HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
say olanları say-1 yapın son satırdan bir önceki satır için
İyi çalışmalar...
 
Konu Sahibi
Sub Makro1()
say = Cells(Rows.Count, 1).End(3).Row
Sheets("Sayfa1").Sort.SortFields.Clear
Sheets("Sayfa1").Sort.SortFields.Add Key:=Range("b2:b" & say), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal 'xlDescending büyükten küçüğe sıralama için
With Sheets("Sayfa1").Sort
.SetRange Range("A1:ah" & say)
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
İbrahim Bey Merhaba,
Tam istediğim gibi olmuş teşekür ederim. sadece aşağı doğru hücreleri seçerken en son dolu satırın bir istğnü seçip sırlama yapmasını istiyorum. teşekküeler
 
Deneyiniz.
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst