Alfabetik Sıralama Yapan VBA Kodu Yazma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Kısa Açıklama

Alfabetik Sıralama Yapan VBA Kodu Yazma isimli başlıkta, ilgili işlemlere dair detaylar yer almaktadır.
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Bu konu ile ilgili açılan talepte sorun çözülmüş idi fakat sorun tekrar etmeye başlayınca tekrar konu açmak zorunda kaldım. Sorum şu idi D8: F aralığına girilen bilgileri E sütununa veri girilince alfabetik sıralamayı sağlan mevcut kodun, E sütununa veri girilince değil de F sütununa veri girilince alfabetik sıralamanın sağlanması için mevcut kodların düzenlenmesi hususunda yardımlarınızı rica ediyorum.​
 

Ekli dosyalar

Sorun nedir anlayamadım.

-- Önce, kodun baş tarafındaki ilgili satırı şöyle değiştirin ve denemeler yapın.
If Intersect(Target, Range("F8:F407, F409:F508")) Is Nothing Then Exit Sub

-- Ardından da, koddaki şu satırların SOL BAŞINA TEK TIRNAK işareti ekleyerek denemeler yapın.
ElseIf Target.Column = 5 And Cells(Target.Row, 6).Value = "" Then
Range("H" & Target.Row & ":AL" & Target.Row + 1).ClearContents
SIRALAMA

Yani sorun veri girişi sırasında mı oluşuyor, yoksa H-AL sütunlarındaki bilgilerin TEMİZLENMESİ kısmıyla mı ilgili onu anlayalım bakalım.
 
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst