Sıralama Yapmak

[Mdemir63]

Selamlar,
Arkadaşlar sayfa koruması varken alfabetik sıralama yaptırabilirmiyim?

Saygılar

 

[Vedat Özer]

Selamlar,

Sayfa koruması varken sıralama yapmak istiyorsanız koruma sayfasındaki "sırala"imlecini tıklayın.

eğer makrolu sayfada çalıştırmak istiyorsanız onun da kodu vardı biraz araştırıyım.

 

[Mdemir63]

Selamlar,

Sayfa koruması varken sıralama yapmak istiyorsanız koruma sayfasındaki "sırala"imlecini tıklayın.

eğer makrolu sayfada çalıştırmak istiyorsanız onun da kodu vardı biraz araştırıyım.

Selamlar,

Evet hocam makrolu sayfa

Saygılar

 

[Ömer]

Merhaba,

Linki inceleyiniz..

http://www.excel.web.tr/f48/kod-caly-tyrmada-sayfa-koruma-sorunu-t91993.html

.

 

[Mdemir63]

Merhaba,

Linki inceleyiniz..

http://www.excel.web.tr/f48/kod-caly-tyrmada-sayfa-koruma-sorunu-t91993.html

.

Selamlar,

Hocam örnek dosyamı ekliyorum. Sıralama butonum sayfa korumalı olduğundan dolayı çalışmıyor.

Saygılar

 

[Mdemir63]

Selamlar,

Hocam; aşağıdaki kodlara sizin verdiğiniz KIRMIZI renkli kodları ekledim oldu çok teşekkürler

Saygılar

Sub SIRAYAKOY()
ActiveSheet.Unprotect "2074"
Range("B2:B201").Select
Range("A1211").Sort Key1:=Range("B2"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
ActiveSheet.Protect "2074"
MsgBox "ALFABETİK SIRALANDI"
End Sub