[Yardım]  Hücre değeri aynı olanlar renklensin ve diğer sütuna yazsın

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Hücre değeri aynı olanlar renklensin ve diğer sütuna yazsın

İleti#1)  Halil_61 » 27 Oca 2019 21:56

Merhaba değerli hocalar,

Elimde olan makro ile ilgili sizden yardım rica ediyorum.Ekteki dosyayı incelediğinizde sizden öncelikle Grupla butonuna bastığınıza A sütununda bulunan benzer değerlerin hücreleri rastgele renk alıyor ve C sütununa sadeleştirip yazıyor.

Benim sizden ricam ; Projem 12. satırdan başladığı için bir türlü 12. satırdan başlatamadım ve sadeşletirirken sadece benzer olanların C sütununa gelmesini istiyorum benzer olmayan yani renklenmeyen hücrelerin C sütununa yazmasını istemiyorum.

İlgilenebilirseniz çok memnun olurum.
Çok teşekkür ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#2)  şahin » 28 Oca 2019 11:00

Ekte
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
şahin
Site Dostu
 
Kayıt: 30 Eyl 2016 23:24
Meslek: memur
Yaş: 29
İleti: 525
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#3)  Halil_61 » 29 Oca 2019 20:57

Şahin hocam çok çok teşekkür ederim. Fakat benzersiz verilerde yan sütuna geliyor sadece benzer verileri yan sütuna alabilir miyiz? Çok güzel olacak olursa eğer yardımınıza ihtiyacım var tekrar çok teşekkürler.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#4)  Erkan Akayay » 30 Oca 2019 00:46

Kullanıcı avatarı
Erkan Akayay
Site Dostu
 
Kayıt: 20 Ağu 2008 13:59
Konum: YALOVA
Meslek: Bilgi İşlem
Yaş: 48
İleti: 4021
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#5)  Halil_61 » 30 Oca 2019 23:55

Erkan hocam çok başarılı bir çalışma olmuş çok teşekkür ederim.Fakat aradığımı bulamadım.
Örneğin verdiğiniz çalışmadan örnek verecek olursam ; Ben sadece benzer verilerin sadeleşerek yan sütuna gelmesini istiyorum.
Yani örneğiniz de olduğu gibi aşağıdaki isimler benzer olduğundan yan sütuna da sadece bu isimlerin gelmesini istiyorum.
Ali
Kemal
Ömer

Bu durumu benim yüklediğim dosya üzerinden yardımcı olabilir misiniz?
Çok Teşekkürler.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#6)  Halil_61 » 31 Oca 2019 00:39

Hocam Şahin hocanın verdiği örnek üzerine otomatik macro save yardımı ile işimi çözdüm, eklediği kodlar aşağıdadır.

Kod: Tümünü seç
Range("C12:C10000").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.Delete Shift:=xlUp
    Range("C12").Select


Çok Teşekkürler.
Saygılarımla.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#7)  Halil_61 » 31 Oca 2019 01:48

Hocam yaptım ama sanırım 15-20 hücreye kadar problem yok , fakat hücre sayısı 200 yukarısı olduğunda hata veriyor. Ekteki Exceli inceleyebilir misiniz? Çoklu sipariş butonuna bastığımızda hata dönüyor hocam.
Yardımınızı rica ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#8)  Kasnic » 31 Oca 2019 14:48

Hata için bakınız. /viewtopic.php?t=10985&f=4
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#9)  Halil_61 » 31 Oca 2019 16:37

Hocam ilginiz ilginiz için teşekkür ederim, lakin baktım Missing değerlerim kapalı benim dosyamda çıkan hata kodu Run Time Error '9' şeklinde açıklama ise : Subscript out of range, sanırım hücre renkleri ile ilgili bir çakışma var . Yardım edebilir misiniz rica etsem.
Çok Teşekkürler.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#10)  Kasnic » 31 Oca 2019 17:41

Sanırım oldu.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#11)  Halil_61 » 31 Oca 2019 21:28

Hocam dosyayı indirdim fakat sanırım arşive alırken tam bitirmeden kapatmış dosyayı hata veriyor arşiv dosyası, sizden ricam tekrar gönderebilir misiniz.İlginiz için çok çok teşekkür ediyorum. Saygılarımla
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#12)  Kasnic » 01 Şub 2019 09:55

Kontrol ettim sıkıntı görünmüyor yinede tekrar ekledim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#13)  Halil_61 » 01 Şub 2019 12:58

Hocam sizi yoruyorum belki ama gerçekten yine hata veriyor.Arşiv bulunamadı ekte de ekran görüntüsünü aldım size göstermek için, sizden ricam excel dosya adını değiştirerek basitleştirerek ingilizce karakterle bir kere daha kaydedip gönderebilir misiniz.
Çok Teşekkür Ederim.
Saygılarımla.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#14)  Halil_61 » 01 Şub 2019 13:00

Yükleyememişim kusura bakmayın lütfen hata dosyası ektedir.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#15)  Kasnic » 01 Şub 2019 13:58

Rar bazen öyle şeyler yapıyor. Sizin için hem rar. hem zıp olarak arşivledim. Sorun devam ederse 7-Zıp programı ile dosya çıkarmayı deneyiniz. Muhtemelen çözülecektir.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#16)  Halil_61 » 01 Şub 2019 20:47

Hocam bu sefer .zip'le açabildim fakat rar hata verdi yine, konumuza gelecek olursam. Hocam benim dosyamı detaylı incelerseniz sadece benzer verileri yanında ki sütuna alır ve benzer olan hücreleri aynı renk ile boyar. Size çok teşekkür ediyorum fakat dosyanıza baktığımda benzer olan hücreler aynı renk değil ve benzersizlerin hepside yan sütuna gelmiş. Aslında programın çalışma mantığını ekteki dosyamı inceleyebilirseniz test dosyamdan daha iyi anlayabilirsiniz.Bu durumu yukarıda paylaştığım gerçek projemde yaptığımda daha hacimli bir liste olduğu için sanırım hata veriyor. Yardımınız için şimdiden çok teşekkür ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#17)  Kasnic » 02 Şub 2019 11:57

Faturalı dosyanızın içine öncekini silip bunu yapıştırınız. Her grubu farklı renklendirecek ve J sütununa listeleyecek. Benzersizler gelmeyecek.
Kod: Tümünü seç
Sub grupla()
Dim yaz As Integer
Dim renk As Integer
Range("J12:J1000000").ClearContents
Range("I12:I" & Rows.Count).Interior.ColorIndex = 0
Range("J12:J" & Rows.Count).Interior.ColorIndex = 0
yaz = 12
renk = 12
For a = 12 To Range("I1000000").End(xlUp).Row
   If Cells(a, "I").Interior.ColorIndex > 0 Then GoTo atla
   For i = a + 1 To Range("I1000000").End(xlUp).Row
   'On Error Resume Next
        If Cells(a, "I").Value2 = Cells(i, "I").Value2 And Cells(i, "I") <> "" Then
        Cells(yaz, "J") = Cells(a, "I")
            Cells(yaz, "J").Interior.ColorIndex = renk
            Cells(a, "I").Interior.ColorIndex = renk
            Cells(i, "I").Interior.ColorIndex = renk
renk = renk + 1

End If
   Next i

yaz = yaz + 1
atla:
Next a

    Range("J12:J100000").Select
    'Range(Selection, Selection.End(xlDown)).Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.Delete Shift:=xlUp
    Range("J12").Select

End Sub
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#18)  Halil_61 » 02 Şub 2019 18:32

Hocam size çok teşekkür ediyorum emeğinize sağlık istediğim gibi olmuştur. Hocam birde aynı projemde şuanda anlamsız bir şey yaşıyorum aynı dosya olduğu için size danışmak istiyorum. Dosya içerisinde Benzersiz Fatura list butonlu makro "L" sütununa benzersizleri listeler ve Crystal Reports için hızlı bir rapor alabilmek adına "L" sütununda ki Fatura Numaralarını aralarına "," ekleyerek "M12" hücresinde birleştirerek yazar. Enteresandır ki "L73" hücresi ve sonrasında hiçbir problem yok doğru birleştirme yapıyor. Ama verileri "L72" dahil ve daha az olursa anlamsız bir ifade getiriyor. Ekteki dosyamda "L72" ye kadar hücreler dolu ve baktığınızda birleştirmediğini göreceksiniz. Ama size zahmet "L73" e bir fatura numarası yazın ve Benzersiz Fatura list butonuna basıp makroyu çalıştırdığınızda da doğru şekilde birleştirdiğini göreceksiniz.

Hocam çok oldum belki ama hakkınızı helal edin çok teşekkür ediyorum, çok uğraştım string değerleri integer yaptım dolu hücreleri saydırdım ama olmadı çok iyi değilim vba'da yardımınız için çok çok teşekkür ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#19)  Kasnic » 04 Şub 2019 11:12

Helal olsun. Elimden geldiği kadar yardımcı olmaya çalışıyorum.
Soruna geri dönersek nedeni konusunda bende meraka düştüm açıkçası. Ama çözümü Virgül "," yerine Nokta "." kullanmakta buldum. Umarım işinize yarar.
Kod: Tümünü seç
xStr = xStr & IIf(Len(xStr) = 0, "",".") & cll.Value
Kullanıcı avatarı
Kasnic
Yeni Başlamış
 
Kayıt: 19 Nis 2018 17:39
Meslek: Satınalma
Yaş: 30
İleti: 99
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Hücre değeri aynı olanlar renklensin ve diğer sütuna

İleti#20)  Halil_61 » 09 Şub 2019 22:31

Hocam çok teşekkür ederim, kusura bakmayın geç dönüş yaptım. Virgül muhakkak elzemdi hocam, basit bir excel fonksiyonu ile noktaları, virgül yaparım dedim ama yine bilinmez sayı hatası verince, excel noktalama ayarlarından şüphelendim ve noktalama ayarlarından çözdüm sanırım, yada hücre içi sayı olan ifadeyi Metinsel yaptım bundan dolayıda olmuş olabilir. Sonuç olarak çözdüm çok teşekkürler.
Başarılar dilerim, Saygılarımla.
Kullanıcı avatarı
Halil_61
Siteye Alışmış
 
Adı Soyadı:Halil ASAN
Kayıt: 06 Nis 2013 21:24
Konum: İş
Meslek: Bilgi İşlem Uzmanı
Yaş: 31
İleti: 164
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Kadıköy

Sonraki

Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: AhrefsBot, Halil_61 ve 2 misafir

Bumerang - Yazarkafe