• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru Sicil numarasını A kolonuna Getirme

  • Konbuyu başlatan Konbuyu başlatan xnanx
  • Başlangıç tarihi Başlangıç tarihi
Katılım
16 Ocak 2010
Mesajlar
81
Excel Vers. ve Dili
Excel 2007 Türkçe
Merhaba,
B ve C kolonlarında kişinin adı ve soyadı yazan binlerce satır, birleştirilmiş satırda sicil numarası var kişiye ait sicil numaralarını a kolonuna nasıl getirebilirim.


,235026

Olmasını istediğim durum;

235028

Yardımlarınız için şimdiden teşekkür edeirm.
 

Ekli dosyalar

Excel dosyanızda VBA penceresinde boş bir modül içine ekleyip çalıştırabilirsiniz.
C++:
Sub SicilNolarıAl()
    Dim Sh As Worksheet
    Set Sh = Worksheets("Sayfa1")
    Son = Sh.Range("B" & Rows.Count).End(3).Row
    Veri = Sh.Range("B1:C" & Son).Value
    For i = 1 To Son
        If Sh.Range("B" & i) <> "" And Sh.Range("C" & i) = "" Then
            Sicil = Sh.Range("B" & i)
            Do While Sh.Range("C" & i + 1) <> ""
                Sh.Range("A" & i + 1) = Sicil
                i = i + 1
            Loop
        End If
    Next i
End Sub
 
Alternatif;

A1;
C++:
=EĞER(ESAYIYSA(B1*1);B1&"";EĞERHATA(DOLAYLI("A"&SATIR()-1);""))
 
Alternatif:

=EĞER(YADA(B2="";ESAYIYSA(B2*1));"";EĞER(ESAYIYSA(B1*1);B1;A1))
 
Geri
Üst