• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Askeri Personel Günlük Nöbet Çizelgesi

Katılım
3 Ocak 2024
Mesajlar
3
Excel Vers. ve Dili
Office 2013
Askeri personel günlük nöbet çizelgesi

Takvimdeki ayı değiştirdiğimizde günlerin yerleri otomatik olarak değiştirebiliyor. İnterneti olmayan askeri bilgisayara bizzat yazarak aktarmam gerekecek bu sebeple desteklerinizi detaylı belirtebilirseniz memnun olurum.

1 ) Kırmızı ile belirttiğim alana nöbet tarihlerinin sırasıyla yazılmasını istiyorum örneğin ; 1-12-17-18

2) Sadece 2024 eylül ayı, 2025 mart ayı, 2025 haziran ayı için 19-20-21 satırlarının açılmasını istiyorum. Diğer aylarda satırın gizlenmesini istiyorum.

3) Ayı değiştirdiğimizde günlerin içindeki kişilerin otomatik silinmesini istiyorum.

4) Ekstra desteklemek istediğiniz durumlarıda ekleyebilirsiniz. Şimdiden teşekkür ederim.


 
Son düzenleme:
Hocam kolay gelsin. Kırmızı ile belirtilen alana nöbet tarihlerinin sırasıyla yazılmasını istiyorum. Yardımcı olur musunuz
 
Merhaba.

2. ve 3. sorulardaki cevaplar aşağıdaki kod yapıyor galiba, bir deneyiniz.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)

If [B2].Value <> "Eylül" Then Rows("19:21").EntireRow.Hidden = False
If [B2].Value <> "Mart" Then Rows("19:21").EntireRow.Hidden = False
If [B2].Value <> "Haziran" Then Rows("19:21").EntireRow.Hidden = False

If [B2].Value = "Eylül" Then Rows("19:21").EntireRow.Hidden = True
If [B2].Value = "Mart" Then Rows("19:21").EntireRow.Hidden = True
If [B2].Value = "Haziran" Then Rows("19:21").EntireRow.Hidden = True

If Intersect(Target, [B2]) Is Nothing Then Exit Sub
[B5:H6,B8:H9,B11:H12,B14:H15,B17:H18,B20:H21].ClearContents

End Sub


1. sorudaki cevaplar yardımcı sütun kullanılarak yapıldı.
Ofis 2021 de formüller sorunsuz çalışıyor.
 

Ekli dosyalar

  • NÖBET.xlsm
    NÖBET.xlsm
    25.7 KB · Görüntüleme: 3
  • Ekran Alıntısı.JPG
    Ekran Alıntısı.JPG
    141.5 KB · Görüntüleme: 7
Son düzenleme:
Geri
Üst