Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Yazılım Geliştirme
  • Delphi / C++ /Vb
  • Bu Konuda
Şimdi Ara

VB6 da birden çok sayfada sıralama

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
4
Cevap
0
Favori
419
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • Merhabalar;

    Elimde oldukça fazla sayıda sayfası olan bir excel var ve her sayfa için aşağıdaki kodu yazmak zorunda kalıyorum. Sayfa2.Range("a3:av1000").Sort key1:=Sayfa2.Range("a3"), order1:=xlAscending
    Sayfa3.Range("a3:av1000").Sort key1:=Sayfa3.Range("a3"), order1:=xlAscending
    Sayfa4.Range("a3:av1000").Sort key1:=Sayfa4.Range("a3"), order1:=xlAscending
    .
    .

    Bir kaç yere bakmama rağmen maalesef çalıştırabildiğim bir kod bulamadım.
    Denediğim kodlar ise kısaca;

    x= "sayfa"&p
    p = 3 to 36
    sheets("x").range(........

    aldığım hata : subscript out of range
    _____________________________


    dim x(3 to 36) as string

    sayfa.........

    aldığım hata : constant expression required


    yardımcı olabilirseniz sevinirim. İyi günler



  • Dim sayfa As Worksheet
    For Each sayfa In ThisWorkbook.Sheets
    sayfa.Range("a3:av1000").Sort key1:=sayfa.Range("A3"), order1:=xlAscending
    Next


    bi bakın
  • Çok teşekkürler yardımcı olduğunuz için. İyi günler dilerim.
    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız.
Anladım Veri Politikamız