• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Çözüldü Tarih Bul ve Göster

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Yamahato

Yeni Üye
Katılım
20 Haz 2020
Mesajlar
17
En iyi yanıt
0
Puanları
1
Yaş
46
Konum
Balçova
Ad Soyad
Yusuf DOĞAN
Office Vers.
Profesyonel plus 2010
Merhaba
Giren ürün isimli Excel sayfasında alınan ürünlerle ilgili bilgi var.
Alınan ürünü arama kutusuna parçanın ismini girdiğimde ListBox1 de o isimle başlayan parçalar çıkıyor.
ListBox1 de çıkan parça kodlarından istediğime tıklayınca , parça ile ilgili bilgiler geliyor.

Şimdi bütün bilgiler mesela en son yapılan alımla olusan en son alım fiyatı geliyor ama
en son yapılan alımın tarihi değil. o malın ilk alındığı ve sisteme işlendiği tarih geliyor.
Aşağıda ki kodda ne yanlış sizce

Giren ürün= veri sayfasının ismi
F hücresi= aradığım verinin GİREN ÜRÜN sayfasında ki yeri
A Hücresi= F hücresinde aradığım verinin alım tarihlerinin yazılı olduğu dikey sütun

' *************** Label33 EN SON ARANILAN DEĞERİN EN SON ALINDIĞI TARİHİ YAZDIRMA ***************


Set s1 = Sheets("GİREN ÜRÜN")
son = s1.Cells(Rows.Count, "F").End(3).Row
sat = WorksheetFunction.Match(ListBox1.Value, s1.Range("F1:F" & son), 0)
Label33 = s1.Cells(sat, "A")
 

ozkansabanci

Excel VBA Developer
Uzman
Katılım
28 May 2018
Mesajlar
238
En iyi yanıt
7
Puanları
28
Yaş
38
Konum
İstanbul
Web sitesi
analistadam.com
Ad Soyad
Özkan Sabancı
Office Vers.
Microsoft 365 Apps for enterprise TR
Merhaba,

Örnek dosya ekleyerek sorunuzu sorabilir misiniz?

Selamlar.
 

ozkansabanci

Excel VBA Developer
Uzman
Katılım
28 May 2018
Mesajlar
238
En iyi yanıt
7
Puanları
28
Yaş
38
Konum
İstanbul
Web sitesi
analistadam.com
Ad Soyad
Özkan Sabancı
Office Vers.
Microsoft 365 Apps for enterprise TR
Merhaba,

En kolay yoldan Çaprazara fonksiyonu ile çözüm getirdim. Eğer Excel sürümünüz desteklemiyorsa tekrar bakarız.
Benim yaptığım çözüme göre örnek ektedir.

İyi Çalışmalar.


çaprazara.gif
 

Ekli dosyalar

  • ÇALIŞMA2.xlsm
    546 KB · Görüntüleme: 9

Yamahato

Yeni Üye
Katılım
20 Haz 2020
Mesajlar
17
En iyi yanıt
0
Puanları
1
Yaş
46
Konum
Balçova
Ad Soyad
Yusuf DOĞAN
Office Vers.
Profesyonel plus 2010
teşekkür ederim.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst Alt