FORMÜL

[ANTALYA 01]

Sayın formdaşlar

ekteki dosyaya yardım etmenizi rica ederim.

 

[Kemal Demir]

Selam,

A kolonundaki bilgileri "/" tan böldüm " B " kolonuna şirket isimleri gelecek şekilde ayırdım, diğer sayfa ile vlookup(Düşeyara) formulu ile bir çözüm.

Umarım ıstedıginız gibidir.

 

[Kemal Demir]

Alternatif Makro ile kucuk bir uyarladım.

Bunuda Çözüm olarak kullanabilirsiniz.

[vb:1:530246b7a2]Sub telgetir()
For x = 2 To 598
For y = 2 To 110
If Sheets(1).Range("b" & x).Value = Sheets(2).Range("a" & y).Value Then
Sheets(1).Range("k" & x).Value = Sheets(2).Range("b" & y).Value
End If
Next
Next
End Sub[/vb:1:530246b7a2]

Umarım işinizi görür.

 

[thinker]

İnceleyin

 

[ANTALYA 01]

Hepinize ayrı ayrı teşekkür ederim.Allah razı olsun