Makro hata veriyor

[vahapexcel]

Private Sub Worksheet_Change(ByVal Target As Range)

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E:E")) Is Nothing Then
With Target.EntireColumn
.FormatConditions.Delete
.FormatConditions.AddUniqueValues
.FormatConditions(.FormatConditions.Count).SetFirstPriority
.FormatConditions(1).DupeUnique = xlDuplicate
With .FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = "255,215"
.TintAndShade = 0
End With
.FormatConditions(1).StopIfTrue = False
End With
End If
End Sub

bu makro çalışma kitabı paylaşımda olunca ekteki ekran hatasını veriyor

 

[Muzaffer Ali]

Merhaba.
Dosya paylaşımda olduğunda FormatConditions(KoşulluBiiçimlendirme) kodları hata verir.

Ayrıca kod sadece bir kere çalıştırıldığında koşullu biçimlendirmeyi uyguluyor zaten, E sütununda her değişiklik olduğunda yeniden çalıştırmaya gerek yok

 

[vahapexcel]

hücreye her değer girişinde otomatik kendi uyarı veriyor

 

[Muzaffer Ali]

Anlatamadım yeniden anlatayım.

Bu kod E sütununda tekrar eden değerlerin renklendirilmesi için koşullu biçimlendirme uyguluyor.

Koşullu biçimlendirme bir kez uygulandığında artık hep çalışır. Yeniden uygulamaya gerek yok. Yani kod bu dosyada sadece bir kere çalıştırılsa yeterli.

Bu kod ise E sütununda her değişiklik olduğunda çalışıyor. Buna gerek yok.


Kodun hata vermesini sebebini bilmenize bile gerek yok ama söyleyeyim, Paylaşımda olan bir dosyada kod ile koşullu biçimlendirme uygulanamaz onun için hata veriyor.

Çözüm:
Kodu yerel bilgisayarda sadece bir kere çalıştırın koşullu biçimlendirme uygulansın sonra kodu silin.
Yada hiç kod kullanmanıza gerek yok koşullu biçimlendirme kısmını açıp kendiniz elinizle de koşullu biçimlendirme uygulasanız yeterli.

 

[vahapexcel]

Konuyu anladım teşekkür ederim.
Kodu yapmamızın sebebi e sütününa yapıştırma yapılınca ve biçimsel değişikliklerde Koşullu biçimlendirme bozuluyordu.
Bozulan koşullu biçimlendirmeyi makro ile her veri girdiğinde düzeltmesi için yapıldı.

Makro olmayınca koşullu biçimlendirme diğer satır ve sütünlara da bulaşıp sayfayı bozuyordu

Yine de teşekkürler