Tablo içerisinde yer alan link'e sorgu eklenmesi

[asyakirazli]

Merhaba;

Excel VBA,Makro konusunda pek fikrim yok ancak çok önemli olan bir konuda sizden yardım rica ediyorum.

Bir tablo düşünün tablonun bir kolonunda satır satır sadece linkler var.( forum,portal,web sitesi)

Bu linklerin hepsine tek tek girerek manuel olarak istediğimiz kelimeleri arıyoruz. Örnek kelimeler ( Türkiye,Galatasaray,Fenerbahçe gibi.)

İstediğim şeyi, Excel'e makro yada VBA desteği ile sorgu eklenmesi ve linkin yanındaki bir kolona,verilen kelimelerden toplam kaç tane geçtiğinin yazılması.

Örnek bir dosya ekledim. Nasıl bir şey istediğimin tablosunu görebilirsiniz.

Yardımlarınız için yalvarıyorum )

Teşekkürler,
Saygılar.

 

[hamitcan]

Bir deneyin.

Sub Ara()
kelime = InputBox("aranacak kelimeyi girin")
For Each hcr In [A2:A8]
If LCase(hcr) Like "*" & kelime & "*" Then a = a + 1
Next
MsgBox kelime & " " & a & " tane vardır."
End Sub

 

[asyakirazli]

.......

Merhaba;

Malesef kod yazmayı bilmiyorum. Gönderdiğim excelde yaparak ekleyebilirseniz çok sevinirim.


Teşekkür ederim.

 

[hamitcan]

2 Nolu mesaja dosyayı ekledim, inceleyebilirsiniz.