[Yardım]  Şarta Bağlı Döndürülebilir Nöbet

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Şarta Bağlı Döndürülebilir Nöbet

İleti#1)  Feylosof » 08 Eyl 2019 00:12

Merhaba,
Forumda mevcut olan çalışmalar tam olarak istediğimi karşılamadığından dolayı kendime göre bir nöbet çizelgesi hazırlayarak ekledim.
Personeli nöbet günlerine atayacak ve nöbet verilmeyecek yerlere atama yapmayacak ve yerler döndürülebilecek.
Detaylı açıklama dosyanın içinde mevcuttur.
Yardım etmek isteyen herkese şimdiden teşekkürler..
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Feylosof
Yeni Başlamış
 
Kayıt: 23 Tem 2019 19:25
Meslek: EĞİTİM
Yaş: 44
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: KOCAELİ

Cevap: Şarta Bağlı Döndürülebilir Nöbet

İleti#2)  ahmetilhan282 » 08 Eyl 2019 21:08

eksikleri var ama başlangıç için bu kodu kullanabiliriz.
Kod: Tümünü seç
Sub nobet()
    Dim ss As Integer, hucre As Range, i As Integer, bul As Range, msg As String
    msg = ""
    Sayfa1.Range("C4:K8").ClearContents
    With Sayfa2
        ss = .Cells(Rows.Count, 1).End(xlUp).Row
        For i = 2 To ss
            For Each hucre In Sayfa1.Range("C4:K8")
                If hucre = "" And .Cells(i, hucre.Column + 2) <> "X" Then
                    hucre.Value = .Cells(i, "B")
                    Exit For
                End If
            Next hucre
            If hucre Is Nothing Then
                msg = msg & ", " & .Cells(i, "B")
            End If
        Next i
    End With
    If msg <> "" Then Sayfa1.Range("F10") = "ATANAMAYANLAR: " & Right(msg, Len(msg) - 2)
    MsgBox "İşlem Tamamlandı.", vbInformation, "BİLGİ"
    Set hucre = Nothing: i = Empty: ss = Empty
End Sub
Kullanıcı avatarı
ahmetilhan282
Site Dostu
 
Adı Soyadı:Ahmet İLHAN
Kayıt: 15 Oca 2014 00:04
Konum: Adana
Meslek: Güvenlik
Yaş: 29
İleti: 847
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Mersin

Cevap: Şarta Bağlı Döndürülebilir Nöbet

İleti#3)  Feylosof » 09 Eyl 2019 00:25

Nöbet tutacak kişi sayısı 45 olsa ve her güne 9 kişi olsa o şekilde desek olur sanırım.
Kullanıcı avatarı
Feylosof
Yeni Başlamış
 
Kayıt: 23 Tem 2019 19:25
Meslek: EĞİTİM
Yaş: 44
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: KOCAELİ

Cevap: Cevap: Şarta Bağlı Döndürülebilir Nöbet

İleti#4)  Feylosof » 09 Eyl 2019 00:30

Feylosof yazdı:Nöbet tutacak kişi sayısı 45 olsa ve her güne 9 kişi olsa o şekilde desek olur sanırım.

Nöbetin yazılı olduğu güne atayacak
Kullanıcı avatarı
Feylosof
Yeni Başlamış
 
Kayıt: 23 Tem 2019 19:25
Meslek: EĞİTİM
Yaş: 44
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: KOCAELİ

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Şarta Bağlı Döndürülebilir Nöbet

İleti#5)  Feylosof » 11 Eyl 2019 00:45

Konu çözümsüz mü acaba?
Kullanıcı avatarı
Feylosof
Yeni Başlamış
 
Kayıt: 23 Tem 2019 19:25
Meslek: EĞİTİM
Yaş: 44
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: KOCAELİ


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: AhrefsBot, Yandex[Bot] ve 0 misafir

Bumerang - Yazarkafe