Hücre Değiştiğinde Sayfalar arasında kayıt Problemi

[nuclearist]

iyi günler,
Basit bir hasta randevu takip dosyası yapmaya çalışıyorum. eklediğim dosyada RANDEVU sayfasında gün gün görülen bir tablo var. Worksheet_Change olayını kullanarak bu tablodan bir hücre değiştiğinde "veri" sayfasına kayıt yapabiliyorum. Ancak aynı sayfanın sağ üstünde bulunan tarih kısmında bir değişiklik olduğunda yine "veri" sayfasından o güne ait bilgileri tabloya dökmeye başaramıyorum. (Sürekli aynı yerde açık kalacak bir tarih seçici ekleyemdiğimden tarih için kendimce bir çözüm bulmaya çalıştım). Yani RANDEVU sayfasındaki tablo gidiş-dönüşlü olması gerekiyor. bu konuda yardımcı olursanız sevinirim.
Ayrıca dosyanın geneli hakkında basitlik açısından fikriniz olursa onları da denemek isterim. Şimdiden herkese teşekkür ederim.

 

[nuclearist]

Değerli dostlar cevap gelmeyince beynimi yakarcasına zorlayarak sorunu düzelttim. esas sayfadaki change olayının kodunu şu şekilde düzelttim;

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range(Cells(3, 3), Cells(68, 7))) Is Nothing Then
ver
Else
If Intersect(Target, Range(Cells(2, 9), Cells(2, 11))) Is Nothing Then Exit Sub
al
End If

End Sub

bir de modüldeki kodda ufak bir kaç düzeltme yapınca çalıştı.
ancak hala sayfada sürekli açık kalacak ve print edilebilecek bir tarih seçici ekleyemedim.