Bir hücreye yazılan değere sahip hücreye fonksiyon ile gitmek.

[cagdasozyurt]

Merhabalar. Elimde uzun bir liste var. Bu listede herkesin bir numarası var. Numaralar N sütünunda. Ben Q1 hücresine bir numara yazıp enter dediğimde Q1 deki numaraya sahip kişiye gitsin istiyorum. Araştırdım ama genelde macro ile yapılan bilgiler var ve çoğu eski olduğundan örnek dosya linkleri ölü. Ayrıca macro nereye nasıl yazılır bilmediğimden formülle olur mu diye soruyorum. Teşekkütler.

 

[ÖmerBey]

Merhaba,
İlgili sayfa sekmesinin (sol altta sayfa isimleri yazan bölümdeki) üzerinde sağ tıklayıp > Kod Görüntüle seçeneğini tıklayınız.
Açılan penceredeki beyaz renkli alana aşağıdaki kodu kopyalayınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("Q1"), Target) Is Nothing Or Target.Cells.Count > 1 Then Exit Sub
On Error GoTo hata
Range("N:N").Find(Range("Q1").Value, , xlValues, xlWhole).Select
Exit Sub
hata:
Range("Q1").Select
MsgBox "Numara bulunamadı"
End Sub

 

[cagdasozyurt]

Teşekkürler elinize sağlık

 

[Korhan Ayhan]

Merhaba,

Fonksiyonla çözüm istediğiniz için alternatif olarak ekteki dosyayı inceleyebilirsiniz.

Harici Link (Silinebilir) ; https://s2.dosya.tc/server13/crtngq/Kitap1.xlsx.html