hücre sırala (makro ile)

[qrrxz]

merhaba, benim excel sayfamda bir botun oluşturup ona makro atamak istiyorum ve o makro a1 ile z47 arasını a'dan z'ye sıralasın. bunu nasıl yapabiliriz. teşekkür ederim.

 

[Metin Karaağaç]

1- Araçlar/makro/yeni makro kaydet
2- yapmak istediklerinizi yapın.
3- kaydı durdur deyin.
4- Araç çubuklarına sağ tıklayıp "Formlar"ı etkin yapın ve düğme oluşturun.
5- düğmeye sağ tıklayıp makronuzu atayın.

İsterseniz düğmelerin isimlerini değiştirebilirsiniz.

 

[qrrxz]

1- Araçlar/makro/yeni makro kaydet
2- yapmak istediklerinizi yapın.
3- kaydı durdur deyin.
4- Araç çubuklarına sağ tıklayıp "Formlar"ı etkin yapın ve düğme oluşturun.
5- düğmeye sağ tıklayıp makronuzu atayın.

İsterseniz düğmelerin isimlerini değiştirebilirsiniz.

arkadaşım onu biliyoruz da, kod kısmına ne yazacağımızı bilmiyoruz?

 

[serdarca]

Aşağıdaki kodu yaptığınız butona atayın.

Sub Sirala()
Range("A1:Z47").Sort Range("A1"), xlAscending, , , xlAscending
Range("A1").Select
End Sub

 

[Metin Karaağaç]

arkadaşım onu biliyoruz da, kod kısmına ne yazacağımızı bilmiyoruz?

Arkadaşım, kod yazmana gerek yok.
Dediklerimi yapman yeterli.
Benim niyetim size balık tutmayı öğretmek di.

 

[qrrxz]

Arkadaşım, kod yazmana gerek yok.
Dediklerimi yapman yeterli.
Benim niyetim size balık tutmayı öğretmek di.

senin dediğinle sadece buton oluşuyor. kodsuz boş buton ne işe yarayacak.
olta olmadan balık nasıl tutulacak peki.

 

[zafer]

Merhaba

Denemeden karar vermeyin. Sn.Acemi1'in tarifi size yaptığınız işlmlere ait otomatik kod oluşturacaktır.
Yeni makro kaydet'te verdiğiniz makro isminide butona atayacaksınız.

Sn.Serdarca'nın kodlarınıda uygulayabilirsiniz.

 

[qrrxz]

Merhaba

Denemeden karar vermeyin. Sn.Acemi1'in tarifi size yaptığınız işlmlere ait otomatik kod oluşturacaktır.
Yeni makro kaydet'te verdiğiniz makro isminide butona atayacaksınız.

Sn.Serdarca'nın kodlarınıda uygulayabilirsiniz.

peki neden oluşturmuyor. siz denediniz mi? açık açık anlatın o zaman nasıl oluştuğunu...

 

[NeTbOcUgU]

....

Sadece BUton Olusuyorsa ArkadaŞim GÜvenlİk Ayarlarinizi Kontrol Edİn LÜtfen DÜŞÜk Sevİyeye Alin SONRA EXCEL SAYFANIZI KAPATIP TEKRARDAN AÇIN KOLAY Gelsİn






Bende Anlamam Aslinda Ama ÖĞrenİyorum :d

 

[qrrxz]

Sadece BUton Olusuyorsa ArkadaŞim GÜvenlİk Ayarlarinizi Kontrol Edİn LÜtfen DÜŞÜk Sevİyeye Alin SONRA EXCEL SAYFANIZI KAPATIP TEKRARDAN AÇIN KOLAY Gelsİn

zaten güvenlik ayarı düşük seviyede...

 

[NeTbOcUgU]

....

Pekİ Fİlİtreden Yapmayi Denedİnİzmİ Otomatİk Fİlİtre Uygulamayi Deneyİn Yada Örnek Bİr Dosya GÖnderebİlİrsenİz Bende Bakayim Elİmden GeldİĞİ Kadar.

 

[qrrxz]

Sub Sirala()
Range("A1:Z47").Sort Range("A1"), xlAscending, , , xlAscending
Range("A1").Select
End Sub

bu kod yeterli oluyor arkadaşım. durumu biz çok önceden çözdük. yinede saol.