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

Katılım
3 Ocak 2024
Mesajlar
2
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:
Katılım
29 Ağustos 2024
Mesajlar
1
Excel Vers. ve Dili
2016
Hocam kolay gelsin. Kırmızı ile belirtilen alana nöbet tarihlerinin sırasıyla yazılmasını istiyorum. Yardımcı olur musunuz
 

ASLAN7410

Altın Üye
Altın Üye
Katılım
15 Temmuz 2012
Mesajlar
2,800
Excel Vers. ve Dili
Ofis 2021 TR 64 Bit
Altın Üyelik Bitiş Tarihi
29.03.2025
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

Son düzenleme:
Üst