Excel Hakkinda Bİlgİ

Katılım
15 Mayıs 2008
Mesajlar
1
Excel Vers. ve Dili
excel 2003 türkçe
Excelde Yardima Bİ Konuda Yardima İhtİyacim Var.excelİn İÇİndekİ Sayfalri A-z Ye Nasil Siralatabİlİrİm.Şİmdİden TeŞkekÜr Ederİm.
 
Katılım
16 Kasım 2007
Mesajlar
700
Excel Vers. ve Dili
Office 2003 - Tr
Merhabalar bu işi kod ile yapmak istiyorsanız, bir düğmeye atayacağınız aşağıdaki kodlarla harf sırasına göre sayfaları sıralayabilirsiniz.

Sub sirala()
For a = 1 To Sheets.Count
For b = a + 1 To Sheets.Count
If LCase(Sheets(b).Name) > LCase(Sheets(a).Name) Then GoTo 100
Sheets(b).Move before:=Sheets(a)
100 Next
Next
End Sub
 
Üst