Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Excel'e Yeni Başlayanlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Excel'e Yeni Başlayanlar Excel kullanmaya yeni başladıysanız sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 12-10-2017, 22:24   #1
Alanore
 
Giriş: 12/10/2017
Mesaj: 2
Excel Vers. ve Dili:
2010
Varsayılan Hücre içinde 2 farklı kelime arama

Merhaba,

Elimde stok verileri var. Bunu makro ile daha anlaşılır ve basit hale getirmek istiyorum.
Örnek tablom;

Adı ------------------------------------- |Miktar -|OlcuBirimi
PARİS AYNALI ŞİFONYER PAKET 6-1 |31,00 |Adet
PARİS AYNALI ŞİFONYER PAKET 6-2 |31,00 |Adet
PARİS AYNALI ŞİFONYER PAKET 6-3 |32,00 |Adet
PARİS AYNALI ŞİFONYER PAKET 6-4 |29,00 |Adet
PARİS AYNALI ŞİFONYER PAKET 6-5 |30,00 |Adet
PARİS AYNALI ŞİFONYER PAKET 6-6 |24,00 |Adet
İSTANBUL AYNALI ŞİFONYER PAKET 3-1 |0,00 |Adet
İSTANBUL AYNALI ŞİFONYER PAKET 3-2 |0,00 |Adet
İSTANBUL AYNALI ŞİFONYER PAKET 3-3 |0,00 |Adet


A stununda birbirinden farklı 1500 adet hücre var. Ben A stunundaki stok isimlerinde "PARİS" VE "ŞİFONYER" kelimelerinin aynı anda geçtiği hücreleri bulup, bunların karşısındaki sayılardan en küçüğünü getirmesini istiyorum. Yani ben yeni sayfada A1 hücresine "PARİS ŞİFONYER" manuel olarak (yada nasıl yazdırmam uygun olur?) yazacağım fakat B1 hücresine yazdığım formül sayesinde bana en düşük sayı olan 24 sayısını getirmeli.

5 gündür min, düşeyara, mbul, indis, kaçıncı vs. kombinasyonlarını deneyerek yapmaya çalışıyorum. İki kelimenin aynı hücrede aynı anda bulunma koşulunu bir türlü sağlayamadım. Umarım yardım eden çıkar.
Alanore Çevrimdışı   Alıntı Yaparak Cevapla
Eski 12-10-2017, 23:17   #2
antonio
Destek Ekibi
 
antonio kullanıcısının avatarı
 
Giriş: 13/02/2011
Mesaj: 1,101
Excel Vers. ve Dili:
Excel 2013
Varsayılan

Merhaba,
A sütununda malzeme isimleri, B sütununda adet olarak en küçüğünü bulmak istediğiniz sayıların bulunduğunu varsayarak aşağıdaki kodları yazdım.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub en_kucuk_miktar()
Dim sh As Worksheet, ss As Long, z As Object, veri As Object
Dim sat As Long

Set sh = Sheets("Sayfa1")
ss = sh.Range("A56789").End(3).Row
Set z = CreateObject("VBScript.regexp")
    z.Global = True
    z.Pattern = "(AYNALI)|(ŞİFONYER)"
    For i = 1 To ss
        Set veri = z.Execute(sh.Range("A" & i).Value)
        If veri.Count = 2 And sh.Cells(i, 2).Value > 0 Then
            If i > 1 Then
                deg = (sh.Cells(i, 2).Value * 1)
                If deg < az Then
                    az = deg
                    sat = i
                End If
            ElseIf i = 1 Then
                deg = (sh.Cells(i, 2).Value * 1)
                az = deg
                sat = i
            End If
        End If
    Next i
    MsgBox "Aranan verilerden en düşük değeri içeren: " & _
            az & vbCrLf & "Bulunduğu satır: " & sat, vbInformation, "antonio"
End Sub
__________________
Özel mesaj sistemini devre dışı bıraktım.
Yardım istemeden önce Forum Kurallarını okuyunuz.
Aynı konuyu farklı bölümlerde açanların sorularını yanıtlamıyorum, bu durumu fark etmeden yanıtlamışsam, mesajımı siliyorum.
antonio Çevrimdışı   Alıntı Yaparak Cevapla
Eski 13-10-2017, 02:18   #3
muygun
Özel Üye
 
muygun kullanıcısının avatarı
 
Giriş: 06/07/2004
Mesaj: 6,892
Excel Vers. ve Dili:
Excel-2003 Türkçe
Varsayılan

Merhaba;
Alternatif olsun.
İyi çalışmalar.

Link:
http://www.dosya.tc/server10/yf6hw4/...arama.zip.html
Eklenmiş Dosyalar
Dosya Türü: zip Alanore-Hücre içinde 2 farklı kelime arama.zip (10.3 KB, 23 Görüntülenme)
__________________
Excel-2003 - Türkçe
muygun Çevrimdışı   Alıntı Yaparak Cevapla
Eski 13-10-2017, 21:30   #4
Alanore
 
Giriş: 12/10/2017
Mesaj: 2
Excel Vers. ve Dili:
2010
Varsayılan

O kadar zaman uğraştıktan sonra cevabın bu kadar kısa sürede gelmesi beni şok etti. Çok teşekkür ederim vakit ayırdığınız için. Sağolun.
Alanore Çevrimdışı   Alıntı Yaparak Cevapla
Eski 13-10-2017, 23:18   #5
antonio
Destek Ekibi
 
antonio kullanıcısının avatarı
 
Giriş: 13/02/2011
Mesaj: 1,101
Excel Vers. ve Dili:
Excel 2013
Varsayılan

Alıntı:
Alanore tarafından gönderildi Mesajı Görüntüle
O kadar zaman uğraştıktan sonra cevabın bu kadar kısa sürede gelmesi beni şok etti. Çok teşekkür ederim vakit ayırdığınız için. Sağolun.
Makroların gücü, onları anlamaya başladıktan sonra daha iyi anlaşılır.
İyi çalışmalar.
__________________
Özel mesaj sistemini devre dışı bıraktım.
Yardım istemeden önce Forum Kurallarını okuyunuz.
Aynı konuyu farklı bölümlerde açanların sorularını yanıtlamıyorum, bu durumu fark etmeden yanıtlamışsam, mesajımı siliyorum.
antonio Çevrimdışı   Alıntı Yaparak Cevapla
Eski 14-10-2017, 01:21   #6
Korhan Ayhan
Moderatör
 
Korhan Ayhan kullanıcısının avatarı
 
Giriş: 15/03/2005
Şehir: ANTALYA
Mesaj: 22,812
Excel Vers. ve Dili:
OFFICE 2013-2016 PRO TR
Varsayılan

Alternatif olarak Sn. muygun'un eklediği dosyada C2 hücresine aşağıdaki DİZİ formülü uygulayarak kullanabilirsiniz.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=MİN(EĞER(EĞER(ESAYIYSA(MBUL(rapor!A2;data!A2:A41));SATIR(data!A2:A41))=EĞER(ESAYIYSA(MBUL(B2;data!A2:A41));SATIR(data!A2:A41));data!B2:B41))
__________________
.
.
.

Soru sormadan önce forumumuzun aşağıdaki
bölümlerini incelediğinizde birçok sorunuza yanıt bulabilirsiniz.


Excel Dersanesi
Uygulamalı Excel Eğitimi
Excel İçin Örnek Uygulamalar
Video Dersane (***Altın Üyelere Özel***)

Lütfen sorularınızın çözümlendiğine dair geri dönüş mesajı yazınız...!
Lütfen yazım ve forum kurallarına uyalım...!
Lütfen sorularımızı açık ve net bir dille ifade edelim...!



FORUM KURALLARI
Korhan Ayhan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 15-12-2017, 22:42   #7
MAMI61
 
Giriş: 12/02/2012
Şehir: bursa
Mesaj: 2
Excel Vers. ve Dili:
office 2003 türkçe
Varsayılan

Merhaba arkadaşlar. ben excell'i uzun zamandır kullanıyorum ama makrolardan anlamıyorum.Bende arkadaşın dediği gibi bir sayfadaki hücrelerden içinde aradığım iki kelime geçenleri bulmak istiyorum. Mesela "PARİS" VE "ŞİFONYER" kelimelerinin aynı anda geçtiği hücreleri istiyorum. nasıl yapabilirim.
MAMI61 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 15-12-2017, 22:48   #8
cem116
 
Giriş: 12/11/2010
Şehir: istanbul
Mesaj: 49
Excel Vers. ve Dili:
2007 türkçe
Varsayılan

Alıntı:
MAMI61 tarafından gönderildi Mesajı Görüntüle
Merhaba arkadaşlar. ben excell'i uzun zamandır kullanıyorum ama makrolardan anlamıyorum.Bende arkadaşın dediği gibi bir sayfadaki hücrelerden içinde aradığım iki kelime geçenleri bulmak istiyorum. Mesela "PARİS" VE "ŞİFONYER" kelimelerinin aynı anda geçtiği hücreleri istiyorum. nasıl yapabilirim.
yani eğer makro şart değilse, örneğin a1 den a9 a kadar

paris şifonyer
paris
şifonyer
paris şifonyer
paris şifonyer
paris
şifonyer
şifonyer
şifonyer

şeklinde giden satırlar olduğunu düşünelim, siz sadece "paris şifonyer" yazan hücre sayısını arıyorsanız ; =EĞERSAY(A1:A9;"paris şifonyer") formülünü kullanabilirsiniz. tırnak işaretlerinin arasına aramak istediğiniz kelimeyi yazarak deneyebilirsiniz
cem116 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-12-2017, 14:46   #9
MAMI61
 
Giriş: 12/02/2012
Şehir: bursa
Mesaj: 2
Excel Vers. ve Dili:
office 2003 türkçe
Varsayılan

tam anlatamadım ben herhalde. şöyle düşünün stok kayıtlarında bir malzeme arıyorum misal "çekiç sapı" ama, "çekiç sap" yada "sap çekiç" yada "saplı çekiç" olarak yazılmış olabilir. ben normal ctrl+f komutuyla aradığımda tam yazımını girmeyince çıkmıyor. dolayısıyla hem içinde sap hemde çekiç geçen hücreleri bulmak istiyorum.
MAMI61 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-12-2017, 15:45   #10
çıtır
Altın Üye
 
Giriş: 06/03/2005
Şehir: KDZ.EREĞLİ
Mesaj: 1,206
Excel Vers. ve Dili:
Excel Vers. ve Dili: Office 2016 TR 64 Bit
Varsayılan

A1 de malzeme ismi yazılı ise B1 kopyala yapıştır.Koşullu biçimlendirme ile de yapılabilir.
Örnek dosya yükleyip linki burda paylaşırsan daha kolay çözüm bulunabilir.Kolay gelsin.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=EĞER(EĞERSAY(A1:A1;"*çekiç*")+EĞERSAY(A1:A1;"*sap*")>=1;"Var";"Yok")
çıtır Çevrimiçi   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 16:59


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Karton Bardak- Çorlu Dil Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Rampa- Rotary- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Çorlu Sürücü Kursu- Şişli Avukat- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kaplan Tekstil- Çorlu Perde- Çorlu Havuz- Makina- Danışmazlar-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden