Yeni Üyelerin Link Eklemesi Yasaklanmıştır!
Full Oyun & Program, Full Film Paylaşımları Yasaklanmıştır!

 Forum ana sayfa » Program Bölümü » Office Uygulamaları » Excel
 Mükerrer Kayıtları Silme ve Sıralatma
Giriş |  Kayıt
Kayıt GirişAra Arama

Mükerrer Kayıtları Silme ve Sıralatma
Yeni başlık gönder Başlığa cevap ver
 1. sayfa (Toplam 1 sayfa)  [ 1 mesaj ] 
  Yazıcı görüntüsü

13 Ağu 2009 10:21
kdursun
Site Yöneticisi
Kayıt: 20 Kas 2008 13:43
Başlıklar: 132
Mesajlar: 208
Çevrimdışı
Herhangi bir sütundaki verileri kontrol ettirerek aynı olanlardan yalnızca bir tanesini yazdırarak sıralatan makro. Verilerilerin A sütununda olduğu varsayımı ile.

Kod: Tümünü seç
Sub Doppelte_löschen()
    Range("A:A").Select
    Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _
        xlTopToBottom
    Range("A1").Select
    nr = ActiveCell
    zellende = Range("A" & Rows.Count).End(xlUp).Row
    Do
        ActiveCell.Offset(1, 0).Range("A1").Select
        If ActiveCell = nr Then
            Selection.EntireRow.Delete
            ActiveCell.Offset(-1, 0).Range("A1").Select
        End If
        nr = ActiveCell
    Loop Until ActiveCell = Range("A" & zellende + 1)
End Sub
Başa Dön Başa Dön
 
 
Eskiden itibaren mesajları göster:  Sırala  
Yeni başlık gönder Başlığa cevap ver
 1. sayfa (Toplam 1 sayfa)  [ 1 mesaj ] 

Forum ana sayfa » Program Bölümü » Office Uygulamaları » Excel

Tüm zamanlar UTC + 2 saat [ GITZ ]

Kimler çevrimiçi

Bu forumu gezen kullanıcılar: Hiç bir kayıtlı kullanıcı yok ve 0 misafir

Bu foruma yeni başlıklar gönderemezsiniz
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı düzenleyemezsiniz
Bu forumdaki mesajlarınızı silemezsiniz

Aranacak:
Geçiş yap:  

Site haritası


YGH Forum memurlar Toner windows 8 indir Grafik Tasarım kanal d oyunları silah oyunları araba oyunları ukash ukash kart maurers satılık daire kamp çadırı