Makro koşullu biçimlendirme.

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

Makro koşullu biçimlendirme.

İleti#1)  mechtab » 02 Arl 2019 21:04

Selamlar,

Makro ile koşullu biçimlendirme yapmak istiyorum. Mevcut dosyayı yükleyemediğim için örnek dosya üzerinden anlatmaya çalıştım.

https://dosya.co/ktcfgle8mp5i/makrokosu ... .xlsx.html


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.




kırmızı çizgiler ile 3 lü sütunlar çizdim. Bunun anlamı 3 lü sütunlardaki tarihler 1 eşssiz değer için giriliyor ve bu sütunların en sağında hep en son tarihler yazılı olacak. Yapmak istediğim en sağdaki sütun ile ondan önceki sütun arasındaki farka göre ( bu farkta farklı değerler girebilmek için en tepede verdiğim sayıya göre değerlendirme yapacak. ) Hücreyi boyamak istiyorum.

Makro konusunda kod yazacak kadar bilgim olmadığı ve internette bulduklarımın benim istediğim gibi olmayışı ve uyarlayamadığım için yardımlarınızı talep ediyorum.

Şimdiden teşekkür ederim.
Kullanıcı avatarı
mechtab
 
Kayıt: 14 Ağu 2019 22:40
Meslek: Tekniker
Yaş: 37
İleti: 9
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Makro koşullu biçimlendirme.

İleti#2)  mechtab » 07 Arl 2019 12:07

Konu günceldir.

Eğer tarif edemediysem takılınan yeri tekrar açıklamaya çalışırım.
Kullanıcı avatarı
mechtab
 
Kayıt: 14 Ağu 2019 22:40
Meslek: Tekniker
Yaş: 37
İleti: 9
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Makro koşullu biçimlendirme.

İleti#3)  mechtab » 12 Arl 2019 18:43

Talep ettiğim yardım için kendim araştırmaya devam ediyorum. Bilgim fazla olmadığı için bölerek ve deneme yanılma yoluyla sonuca ulaşmaya çalışıyorum.

Böyle bir kod yazdım ama istediğimi yaptıramıyorum.

Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Column Mod 3 = 2 Then

If ActiveCell.Value - ActiveCell.Offset(0, -1).Value <= 500 Then

MsgBox "Girilen değer 500 den küçük dikkat!"

Else

End If
End If
End Sub



Kod ile yapmaya çalıştığım : Aktif hücre sütun değeri mod 3 e göre 2 ise girilen değer kendinden önceki hücreden farkı 500 den küçük ise msgbox ile uyarı versin istiyorum ama hangi değeri girersem gireyim msgbox çalışıyor.

https://dosya.co/ydingxren1nc/mod.xlsb.html
Kullanıcı avatarı
mechtab
 
Kayıt: 14 Ağu 2019 22:40
Meslek: Tekniker
Yaş: 37
İleti: 9
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: AhrefsBot ve 1 misafir

cron
Bumerang - Yazarkafe