0
Kayıt Ol

Excell satırları silme

3

●

100

  • 23-10-2024, 21:58:33
    #1
    excily
    excily
    Üyeliği durduruldu
    Merhaba,

    bir kod uyguladım ve görseldeki gördüğünüz kadar bir satır oluşturdu ben ise 392 den sonraki satırları silmek istiyorum kod uyguluyorum ama başaramadım nasıl yapabilirim
    böyle bir şey

  • 23-10-2024, 22:06:31
    #2
    shms
    shms
    Excel dosyasında 392. satırdan sonraki satırları silmek için aşağıdaki adımları izleyebilirsiniz:

    Adım 1: Excel Dosyasını Açın

    1. Excel uygulamanızı açın.
    2. Silmek istediğiniz satırların bulunduğu dosyayı açın.

    Adım 2: 392. Satıra Gidin

      1. satıra gidin. Bunu yapmanın en hızlı yolu, sol taraftaki satır numarasına tıklamak veya aşağı kaydırmaktır.

    Adım 3: 393. Satırdan Sonrasını Seçin

    1. 393. satırı seçin: 393. satıra tıklayın.
    2. Shift Tuşunu Kullanarak Seçin:
      • Shift tuşunu basılı tutun ve Ctrl + ↓ (aşağı ok) tuşlarına basarak, dosyanın en altına kadar olan tüm satırları seçin.

    Adım 4: Satırları Silin

    1. Seçimi yaptıktan sonra, sağ tıklayın.
    2. Açılan menüden "Sil" seçeneğine tıklayın.

    Adım 5: Dosyayı Kaydedin

    1. Değişikliklerinizi kaydetmek için "Dosya" > "Kaydet" veya Ctrl + S tuşlarına basın.

    Alternatif Yöntem: Filtre Kullanma


    Eğer daha fazla satırı hızlı bir şekilde silmek istiyorsanız, filtre uygulayarak sadece istediğiniz satırları görebilir ve diğerlerini gizleyebilirsiniz:
    1. Filtre Uygulayın:
      • Üstteki başlık satırına (1. satır) tıklayın ve "Veri" sekmesine gidin.
      • "Filtre" seçeneğini tıklayın.
    2. 392. Satırdan Sonrasını Gizleyin:
      • Filtreyi kullanarak 392. satırdan sonraki tüm satırları gizleyin.
    3. Gizli Satırları Silin:
      • Gizli satırlar üzerinde sağ tıklayın ve "Sil" seçeneğini kullanın.
  • 23-10-2024, 22:07:20
    #3
    Sporky
    Sporky
    Evet, Excel VBA (Visual Basic for Applications) kullanarak da 392. satırdan sonrasını silebilirsin. Aşağıdaki VBA kodunu kullanarak bunu yapabilirsin:

    Adımlar:

    1. Excel'de Geliştirici Sekmesini Aç:
      • Eğer "Geliştirici" sekmesi aktif değilse, dosya > seçenekler > şeridi özelleştir > geliştirici kutucuğunu işaretle ve onayla.
    2. VBA Editörünü Aç:
      • "Geliştirici" sekmesinde "Visual Basic" seçeneğine tıkla.
    3. Yeni Modül Oluştur:
      • Açılan VBA penceresinde Insert > Module seçeneğine tıkla.
    4. Aşağıdaki Kodu Yapıştır:
    Sub Sil_392_Sonrası()
    Dim SonSatir As Long
    ' Çalışma sayfasındaki son dolu satırı bul
    SonSatir = Cells(Rows.Count, 1).End(xlUp).Row
    
    ' 392. satırdan sonrasını kontrol edip silme
    If SonSatir >= 392 Then
        Rows("392:" & SonSatir).Delete
    End If
End Sub
    1. Makroyu Çalıştır:
      • Kodun yapıştırıldığı VBA ekranını kapat. Excel'e geri dön ve "Makrolar" bölümüne gidip Sil_392_Sonrası adlı makroyu çalıştır.
    Bu kod, mevcut çalışma sayfasındaki en son dolu satırı bulur ve eğer 392. satırdan sonrası varsa, tüm bu satırları siler.
  • 23-10-2024, 22:11:39
    #4
    excily
    excily
    Üyeliği durduruldu
    Sporky adlı üyeden alıntı: mesajı görüntüle
    Evet, Excel VBA (Visual Basic for Applications) kullanarak da 392. satırdan sonrasını silebilirsin. Aşağıdaki VBA kodunu kullanarak bunu yapabilirsin:

    Adımlar:

    1. Excel'de Geliştirici Sekmesini Aç:
      • Eğer "Geliştirici" sekmesi aktif değilse, dosya > seçenekler > şeridi özelleştir > geliştirici kutucuğunu işaretle ve onayla.
    2. VBA Editörünü Aç:
      • "Geliştirici" sekmesinde "Visual Basic" seçeneğine tıkla.
    3. Yeni Modül Oluştur:
      • Açılan VBA penceresinde Insert > Module seçeneğine tıkla.
    4. Aşağıdaki Kodu Yapıştır:
    Sub Sil_392_Sonrası()
    Dim SonSatir As Long
    ' Çalışma sayfasındaki son dolu satırı bul
    SonSatir = Cells(Rows.Count, 1).End(xlUp).Row
    
    ' 392. satırdan sonrasını kontrol edip silme
    If SonSatir >= 392 Then
        Rows("392:" & SonSatir).Delete
    End If
End Sub
    1. Makroyu Çalıştır:
      • Kodun yapıştırıldığı VBA ekranını kapat. Excel'e geri dön ve "Makrolar" bölümüne gidip Sil_392_Sonrası adlı makroyu çalıştır.
    Bu kod, mevcut çalışma sayfasındaki en son dolu satırı bulur ve eğer 392. satırdan sonrası varsa, tüm bu satırları siler.
    olmadı