BİR SAYFADA YAZILAN, DİĞER SAYFALARDA VAR MI?
BİR SAYFADA YAZILAN, DİĞER SAYFALARDA VAR MI?
Örnek; Ankara, İzmir, Adana, Konya, Bursa gibi herhangi bir sayfada yazılan bir değer diğer sayfaların herhangi birisinde yer alıyorsa, hücre sarı renkli olsun.
Sayfa adlarını yazdırmak için aşağıda kodları verilen KTF ( Kullanıcı Tanımlı Fonksiyon) dan yararlanılır.
Function syf(syfno As Integer) As String
Application.Volatile
If syfno <= Worksheets.Count Then
syf = Worksheets(syfno).Name
Else
syf = “”
End If
End Function
İGiriş sayfasında “sht” adlı bir dinamik alan oluşturulur. Formülü:
=OFFSET(Giriş!$A$2;0;0;COUNTA(Giriş!$A:$A)-COUNTIF(Giriş!$A$2:$A$12;””)-1;1)
Diğer sayfaların her birisnin tablosu için aşağıdaki formülle koşullu biçimlendirme oluşturulur.
=SUMPRODUCT(COUNTIF(INDIRECT(“‘”&sht&”‘!B2:F15”);B2))>1
Dosya:
Son Yorumlar