Rakamları eşleştirip isimleri sütuna aktarma

[SadiSerdari]

Arkadaşlar excel dosyasında A sütununda rakamlar var bu rakamların her biri isme ait numara, D sütununda numaralar ve E sütununda karşılık gelen isimler var yapmak istediğim A sütununda her ismin numarası kadar F sütununa isimleri yazdırmak. Bunu nasıl gerçekleştirebilirim. Teşekkürler.

 

[apocalyt]

doğru anladıysam f1 hücresine kopyalayıp aşağıya çekin..

=DOLAYLI("e"&A1)

 

[SadiSerdari]

Sayın apocalyt; ilginiz için Teşekkürler. Çözüm güzel, ancak ufak bir sıkıntı var. Örneğin 20 den sonra 21 gelmezse 22 ye eşit olan ismi atlayıp bir sonraki isme devam ediyor. Bu aşağıya doğru devam ettikçe isimler iyice karışıyor. Bu noktada bir çözüm sunabilirseniz sevinirim.

 

[apocalyt]

o halde şöle deneyelim...f1 hücresine kopyalayıp aşağıya çekin..

=DÜŞEYARA(A1;$D$1:$E$1400;2;YANLIŞ)

 

[SadiSerdari]

Teşekkürler apocalyt. Hem formül hemde makro olarak kullandım sonuç istediğim gibi size ve ilgilenen herkese Teşekkürler.
Makrosu:

Sub Makro1()

    endRow = Cells(Rows.Count, 1).End(xlUp).Row
    For iRow = 1 To endRow
        If Range("A" & iRow) = "" Then
            Range("F" & iRow) = ""
        Else
            Range("F" & iRow) = WorksheetFunction.VLookup(Range("A" & iRow), Range("D:E"), 2, False)
        End If
    Next
    
End Sub

 

[apocalyt]

rica ederim..ne demek..