• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

formülü kopyalayamıyorum

  • Konbuyu başlatan Konbuyu başlatan ysuf1
  • Başlangıç tarihi Başlangıç tarihi
ALT F11 ile açtığınız kod bölümünde bir modül oluşturup kodları içerisine kopyalayı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
 
ilgine teşekkürler fakat ben bu işlemi yapamadım birazdaha açık anlatabilirmisin
 
ilgine te&#351;ekk&#252;rler fakat ben bu i&#351;lemi yapamad&#305;m birazdaha a&#231;&#305;k anlatabilirmisin
 
Sn yusf1 excel açıkken alt+F11 basarsanız karşınıza visual basic ortamı gelir.ekranın solunda sayfaların isimleri bulunan bölümde boşluğa sağ klıck yapın insert sekmesinden modül seçip eklettirin
eklenen modülü açın ve kodları içine yazın.önceki mesajda anlatılmak istenen bu idi saygılarımla
 
özürlerimle Sn ysuf1 isminizi yanlış yazmışım.Sn ileriexcel sizede teşekkürler
 
Geri
Üst