Çalışma sayfaları arasında eşleştirme

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

Çalışma sayfaları arasında eşleştirme

İleti#1)  ercan_60 » 22 Kas 2021 22:15

Ekteki dosya "SNO-islem_gören" sayfasındaki tüm hücre değerlerini RANGE aralığı belirlenmek suretiyle diğer sayfalarla karşılaştırmak istiyorum. Aynı olan hücre değerlerini diğer sayalarda renklendirilip, (aynı olan yani çakışan hücre değerlerini) yeni bir excel dosyasına kaydetmek istiyorum. Tüm bunları bir makro yardımıyla nasıl yapabilirim? Yardımlarınız için şimdiden Teşekkür ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
ercan_60
Yeni Başlamış
 
Kayıt: 09 Oca 2020 10:44
Meslek: bilgisayar
Yaş: 46
İleti: 19
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

Cevap: Çalışma sayfaları arasında eşleştirme

İleti#2)  Ali ÖZ » 23 Kas 2021 12:15

Deneyin.

Kod: Tümünü seç
Private Sub CommandButton1_Click()
  Application.ScreenUpdating = False
   Set s1 = Sheets("SNO-islem_gören")
   For Each alan In s1.UsedRange
    For Each s In ThisWorkbook.Sheets
      If s.Name <> "SNO-islem_gören" Then
        For Each alan1 In s.UsedRange
          If alan = alan1 And alan.Row > 1 Then
            alan1.Interior.ColorIndex = 6
          End If
        Next
      End If
    Next
  Next
Application.ScreenUpdating = True
End Sub
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 40
İleti: 10315
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: Çalışma sayfaları arasında eşleştirme

İleti#3)  ercan_60 » 23 Kas 2021 23:23

Öncelikle teşekkür ederim.
Makro her çalıştığında bir önceki renklendirme ekranda kalıyor her seferinde işlemi yenilemiyor. (Veriler değiştiğinde) 2. ve 3. sayfadaki sütun satır sayıları "SNO-islem_gören" sayfasındaki satır sayısından farklı olduğunda; "SNO-islem_gören" sayfasındaki satır sayısı kadar alanı renklendiriyor. Dolayısıyla 2. ve 3. sayfalardaki boş olan hücreler de renklendirilmiş oluyor.

Bu şekilde çalıştığında renklendirilen hücreleri yeni bir dosyaya da kayıt etmek de istiyorum. Makro uyguladığım dosyayı net anlaşılması için ekliyorum.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
ercan_60
Yeni Başlamış
 
Kayıt: 09 Oca 2020 10:44
Meslek: bilgisayar
Yaş: 46
İleti: 19
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 7 misafir

Bumerang - Yazarkafe