Tarih Seçici de Bulunduğumuz Günün Zemin Rengi

[ahmed_ummu]

Merhaba arkadaşlar.

Eklediğim tarih seçici dosyasında, dtp userform açıldığında günün tarihinin zemin rengini açık gri yapmak istiyorum. İnitialize yordamına aşağıdaki kırmızı olan kodları ekledim ama "method" hatası veriyor. Rica etsem yardımcı olabilir misiniz.

Private Sub UserForm_Initialize()
Dim intTextBox As Integer
For intTextBox = 1 To 42
Set textBoxes(intTextBox).TextGroup = Controls("t" & intTextBox)
If textBoxes(intTextBox).TextGroup = Controls("t" & intTextBox).Day(Now) Then
textBoxes(intTextBox).TextGroup = Controls("t" & intTextBox).BackColor = &H8000000F
End If
Next intTextBox

Me.TextBox10 = Month(Now)
Me.TextBox1 = Year(Now)
Me.TextBox2 = MonthName(Me.TextBox10)
Call olustur
TextBox10.SetFocus
End Sub

 

[Levent Menteşoğlu]

Dosyanız ektedir.

 

[ahmed_ummu]

Dosyanız ektedir.

Günaydın Levent bey. Çok teşekkürler.