Kodda Revize Tarihe Göre Sıralama

YasarPiskin

VIP Üye
Kullanıcı
Katılım
6 Ara 2016
Mesajlar
2,059
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
-- ŞABLON sayfasının kod bölümünde mevcut Worksheet_Change kod blokunda;
If Intersect(Targ.... satırının üstüne If Selection.Count > 1 Then Exit Sub şeklinde yeni bir satır ekleyin (şart değil, eklenmesi yerinde olur).
-- Thisworkbook bölümünde mevcut Workbook_SheetChange kod blokunda ilgili satırı
Range("B11:J" & s).Sort [B10], 1 şeklinde değiştirin.

Bu haliyle sorun olmaması gerekir.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt