ADO ile Şarta Bağlı Renklendirme

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

tahsinanarat

Kullanıcı
Katılım
13 May 2019
Mesajlar
303
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(19 satır)
Yukarıdaki kod ile kapalı dosyadan Servis Takip listesine D1 hücresinde belirttiğim gruba göre istediğim sütunları çekebiliyorum. F12 ile takip listesinin I sütununa Bay, Bayan bilgileri geliyor, F3 ile de J sütununa SERVUS SORUMLUSU (kapalı dosyanın c sütunundaki) ibaresi geliyor (var olanlar)
Buraya kadar herhangi bir sıkıntım yok.

Şimdi benim istediğim;
- I sütununda bayan yazıyorsa b sütununa gelen ad ve soyadın kırmızı olması (f12 ile gelen)
- J sütununda SERVİS SORUMLUSU yazıyorsa GÜVENLİK GÖREVLİSİ yazan c sutuna (Sorumlu) kelimesinin eklenmesi, yani GÜVENLİK GÖREVLİSİ (sorumlu) (F3 ile gelen)

Bu istediklerimi yukarıdaki Ado ile çektiğim kodun içerisine yerleştirmek istiyorum. Yardımlarınız için şimdiden teşekkürler. Hayırlı Bayramlar diliyorum.
 
İnternet Sitesinden Veri Çekme
H Sütununa Göre Sayfalara Ayırma
Tarihe göre sırala Oylamaya göre sırala
Dosya olmadan biraz sıkıntılı oluyor ama aşağıdaki kodu bir test edin hocam
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(25 satır)
 
Oyla 0 Olumsuz oyla
@tahsinanarat hocam 1.mesajımdaki kod sıkıntılı olursa alternatif olarak aşağıdaki kodu, kodlarınızın sonuna ekleyiniz.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(4 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
Murat bey hoşgeldiniz aramıza.
Sitemizi beğendiğinize sevindim.
Şu anda hiç bir Excel forumunda olmayan özelliklerimiz var ve gerçekten yardımcı olunma noktasında kimsenin desteğine hayır demeyiz :)
Sitemizde;
  • Dosya ekleme
  • Makale ekleme
  • İpuçları ve Kısayol bilgileri paylaşmak için yakın zamanda "İçerik Ekleyici" grubu oluşturulacak.
Bu grupta olma talebiniz olursa biz de memnun oluruz.

İyi bayramlar, esen kalın.
 
Oyla 0 Olumsuz oyla
Merhaba sevgili hemşerim Sayın @MtCom .
Paylaşmayı sevenlerin arasına hoşgeldiniz.

Sitemizde, çok ve uzun süreler çevrimiçi olmanız,
çevrenizdeki Ms.Excel kullanıcılarını forumumuzdan haberdar etmeniz temennisiyle iyi günler dilerim.
.
 
Oyla 0 Olumsuz oyla
Sn. metehan8001, 5 nolu mesajınızdaki;
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(4 satır)
5 nolu mesajınızdaki kodları, benim kodların sonuna eklediğimde olumlu sonuç aldım, bu benim işimi görür, çok teşekkürler. Bayramınız mutlu geçsin.
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt