ayın son gününü işaretleme

[emrexcel123]

arkadaşlar ve üstadlar selamlar
sorum şu : bir listede yer alan tarihlerden ayın son gününe denk gelenlerinin koyu renkle biçimlendirilmesini nasıl yapabiliriz yardımcı olacak arkadaşlara teşekkürler ii çalışmalar...

 

[Recep İpek]

Ekli örnek dosyayı inceleyiniz.

 

[Recep İpek]

Sonradan farkına vardım.Sanırım siz bütün ay sonlarının biçimlendirilmesini istiyorsunuz.

Bunun için üzerinde biraz çalışmak gerekiyor.

 

[kulomer46]

............

 

[Necdet]

Merhaba,

Dosyayı inceleyiniz, Koşullu Biçimlendirme ile yapılmıştır.

=TARİH(YIL(A1);AY(A1)+1;0)=A1
=DATE(YEAR(A1);MONTH(A1)+1;0)=A1

 

[emrexcel123]

arkadaşlar ve üstadlar sorumun yanıtını uğraşıp buldum yeni konu açtığım için özür dilerim yanıtı şu şekilde buldum :mrgreen:

Sub bicimlendir()
Range("a4:k65536").Interior.ColorIndex = xlNone
Range("a4:k65536").Font.Bold = False
For x = 4 To [a65536].End(3).Row
For y = 1 To 11
If DateSerial(Year(Cells(x, 2)), Month(Cells(x, 2)), Day(Cells(x, 2)) + 1) = DateSerial(Year(Cells(x, 2)), Month(Cells(x, 2)) + 1, 1) Then
Cells(x, y).Interior.ColorIndex = 6
Cells(x, y).Font.Bold = True
End If
Next
Next
End Sub

ii akşamlar...