A koloundaki veriler F kolonu içerisinde mevcut ise?

[Kemal Demir]

Arkadaslar Selam,

A kolonundaki veriler F kolonunda geçiyor ise b kolonundaki değerleri yazmasını isticem

Sole Bir kod Uyarladım ama Tum kolonu kapsamıyor

[vb:1:461632205e]
Sub Bul()
For i = 1 To 12
If Cells(i, 6) Like Cells(i,1) Then
Cells(i, 7).Value = Cells(i,2).value
End If
Next
End Sub
[/vb:1:461632205e]

Bu kod Calısmıyor Ama Oysa;

Aşagıdaki Kodda örneğin ali ismi aratıldıgında kod calısıyor tum a kolonunu taraması için nasıl bir ilave yapılabilir.

[vb:1:461632205e]
Sub Bul()
For i = 1 To 12
If Cells(i, 6) Like "*ali"" Then
Cells(i, 7).Value = Cells(i,2).value
End If
Next
End Sub
[/vb:1:461632205e]

 

[Recep İpek]

Merhaba,

Sorunuzu anladığım kadarıyla ekteki dosyada yapmaya çalıştım.

Deneyebilirmisiniz?

Kolay Gelsin.