Excel sayfası açıldığında "B" Sütununda bulunan günün tarihi seçilsin

[sdegirmenci]

Merhaba; Excel de , Sayfa açıldığında "B" sütununda Günün tarihi olan satırın seçilmesini ve ekrana o bölümün gelmesini istiyorum.
Bu konuda yardımcı olabilirseniz sevinirim.Saygılarımla

 

[Necdet]

Merhaba,
Aşağıdaki kodlar ilgili Sheet'in kod bölümünde olmalı. Dener misiniz?

Private Sub Worksheet_Activate()
    
    On Error Resume Next
    Dim c   As Range
    
    Set c = Range("B:B").Find(Date, LookIn:=xlValues)
    If Not c Is Nothing Then Range("B" & c.Row).Activate

End Sub

 

[sdegirmenci]

Merhaba, Necdet Hocam ilginize çok teşekkür ederim., Kodu uyguladım tam istediğim gibi oldu. Tekrar çok teşekkür ederim. Aynı şeyi Listbox üzerindede yapmamız mümkünmü.UserForm açıldığında Bu "B" sütunundan veri alan ListBox dada olabilirmi.

 

[sdegirmenci]

Bu konuda yeni dosyam ektedir.