• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Bir sütundaki verilerimin içinde arama yapıp en yakın değeri bulmak

A

a_self_lion

Katılım
14 Ocak 2005
Mesajlar
807
Excel Vers. ve Dili
Microsoft Office Professional Plus 2021
Merhaba arkadaşlar C sütunumda 8 inci satırdan 1000 inci satıra kadar 9.satır 610504001005 10.satır 610504001011 11.satır 610805005009 12.satır 620506009011 .... şeklinde stok kodlarım mevcut.
değerim deki bir yeriyi diyelim ki 610504001014 olsun bu veriyi bu c sütununda kontrol edip en yakın yeri olan 10.satırı bulup hemen bir altına satır ekletip bu kodu oraya yazdırıp Rengini de kırmızı yapabilir miyim.

Örnek dosya
http://dosya.web.tr/Kpn2pO

Saygılarımla.
 
Son düzenleme:
kardeş cümleyi o kadar uzun kurmuşsun ki, anlamadım, belge ekleyebiliyor musun
 
en yakın yer derken, rakamsal anlamda mı en yaknı yer
 
olabilir rakamsal yada metin olarak hiç fark etmez. ben birde örnek ekleyeyim.
 
peki burdakilerle tamamen aynı olacak hiçbir sayı olacak mı, yoksa gelebilecek tüm sayılar bu listedekilerden farklı mı olacak
 
Evet aynı sayıda olacak aynı ise zaten karşısına verilerini yazacak
Aynı olamayan çıkarsa işte en uygun yere satır açarak yazdırmak istiyorum. Ki sonradan elimle girmek zorunda kalıyorum. Çünkü yeni aylarda yeni kodlar çıkıyor.
 
az kaldı, sadece basit bir yerde takıldım, belki bunuda sen biliyorsundur, mesela a1 hücresinde yazan değeri tüm sayfada nasıl aratırız, makro ile
 
Gerisini nasıl yaptın yakın değeri bulmayı
 
=İNDİS(C:C;KAÇINCI(MİN(İNDİS(MUTLAK(F1-C:C);0;0));İNDİS(MUTLAK(F1-C:C);0;0);0)) bu formülle, f1 hücresine arayacağınız değeri yazdığınızda, bu formülü yazdığınız hücreye c sütünundaki tüm değerlerin arasında arayıp, formül yazdığınz hücreye getirir.

bundan sonraki iş makro ile olacak, bsu formülü yazdığınız hücredeki veriiy c sütununda aratmaya kaldı şimdi :)
 
yalnız c sütununda hiçbir metin olmamalı, sadece sayı olmalı
 
Benim C sutunumdaki verilerim Metin Sanırım bu şekilde olmaz diye düşünüyorum. Denedim sizinkini. Bir tane bile metin olsa formül yanlış oluyor.
Teşekkür ederim Sefa bey.
 
ama en yakın sayının belirlenmesinde sadece rakam kullanılır, metinleri ne yapacak, zannımca metin içeren sütunlarda formül ile bu elde edilemez. makro ile olabilir belki
 
Formül demedim ki zaten vba ile olacak tabikide stok muhasebe satış vb... kodları genelde her zaman metin olur.
Sub TEST()
ara = Trim("610301005005")

For i = Len(ara) To 1 Step -1
Set bul = Columns(3).Find(Left(ara, i))
If Not bul Is Nothing Then
Rows(bul.Offset(1).Row).Insert
Exit For
End If
Next i

End Sub
Şöyle bir şey olacak ama tam çözemedim. Bu Belirttiğim örnek çalışmanın sadece bir parçası Sayın Sefa
İlgin için çok teşekkür ederim.
 
Evet güzel fakat burada Columns hepsinde değilde mesala aranan değeri left ile her seferinde bir karakter aşağı çekiyor ya işte onu columns verisinin içindede öyle aramak gerekiyor. yoksa bulamadı diyor.
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst