Anasayfa | Akademik Forum | Sizden Gelenler | Sipariş
Menü Açıklamaları
Sorular - Cevaplar
Makaleler
Makrolar
Yerleşik İşlevler
Animasyonlar
Yumurtalar
Fonksiyonlar
MTK Programlar
ExcelCE
Dosya İndir
Neler Yaptık?
İletişim
Sorular - Cevaplar
Soru-Cevap: 48 - M. Temel Korkmaz - 28.04.2004

Sayfa isimlerin açılışta alfabetik olarak sıralansınlar.
Soru - 48:
Excel'de bir dosyayı açtıktan sonra çıkan sayfaları isim sırasına göre otomatik sıralamak istersek bunu nasıl yapabiliriz ve bununla ilgili makro ne şekilde olmalıdır. Bu sorumuzu cevaplarsanız çok sevineceğiz. Saygılar.

Cevap - 48:

Eğer dosyanızın açılır açılmaz bu işlemi gerçekleştirmesini istiyorsanız, makroyu Auto_Open makrosuna yazmalısınız.

Sub Auto_Open()
    Dim i As Integer
    Dim j As Integer

   
If Worksheets.Count = 1 Then Exit Sub
    For i = 1 To Worksheets.Count - 1
        For j = i + 1 To Worksheets.Count
            If Worksheets(j).Name < Worksheets(i).Name Then
                Worksheets(j).Move before:=Worksheets(i)
            End If
        Next j
    Next i
End Sub
Destek
M.ÖZTÜRK - Y.KARAMAN
Bu siteyi, "Hayatını çocuklarının Ahlâklı ve Dürüst yetişmesi için harcamış olan Cefakar ve Fedakar, Canım ANNEM'e adadım."
Copyright © 1998-2011 M. Temel Korkmaz - Tüm hakları saklıdır.