Çözüldü Bir tabloda veri arama

keremelmas · 26 Tem 2019

Herkese merhaba,
Pek çok yerde aramama rağmen bulamadığım bir konuyu sizlere sormak istiyorum, şimdiden teşekkürler,

Bir stok tablosu hazırlıyorum, bununla ilgili örnek dosyayı ekte gönderdim. Örneğin;
A sütunu benim listem olsun, D sütunu da yeni isimleri girdiğim yer olsun.
D sütununa yeni isim girdiğimde, girdiğim ismi A sütununda arayarak eğer A sütununda yok ise A sütunundaki son ismin altına otomatik olarak yazdırmam mümkünmüdür.
Yardımlarınız için şimdiden teşekkürler..

Evren · 26 Tem 2019

Dosyanız ektedir.

Kod:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("D2:D" & Rows.Count)) Is Nothing Then Exit Sub
Dim k As Range
Set k = Range("A2:A" & Rows.Count).Find(Target.Value, , xlValues, xlWhole)
If k Is Nothing Then Range("A" & Cells(Rows.Count, "A").End(xlUp).Row + 1).Value = Target.Value

End Sub

keremelmas · 26 Tem 2019

Evren bey çok teşekkür ederim,
Makro ile çalışmayı öğrenmem gerektiğini anladım. Formül ile çok uzun şekilde yapılabilecek bir şeyi çok daha kısa yoldan yapmak mümkünmüş.

Emeğiniz için çok teşekkür ederim.

Evren · 26 Tem 2019

keremelmas' Alıntı:
Evren bey çok teşekkür ederim,
Makro ile çalışmayı öğrenmem gerektiğini anladım. Formül ile çok uzun şekilde yapılabilecek bir şeyi çok daha kısa yoldan yapmak mümkünmüş.

Emeğiniz için çok teşekkür ederim.

Rica ederim.
İyi çalışmalar.

Çözüldü Bir tabloda veri arama

Daha fazla seçenek

keremelmas

Ekli dosyalar

Evren

Ekli dosyalar

keremelmas

Evren