Sorgu için arama sonuçları: vardiya çalışma

Hayırlı günler öncelikle doğru yere yazdığımdan emin olamadığım için hatam var ise kusura bakmayın. Bir işyerinde 12 personel çalışmaktayız. 12 saatten 2 vardiya her vardiyada da 3 er kişi grup halinde nöbet tutuyoruz(24 saatte 6 kişi). Zorunlu nedenlerden dolayı 9 kişi kaldık listeyi bir türlü...

...Birkaç konuda sıkıntıya düştüm. Vardiyalı sistemle çalışan bir şirket mensubuyum benden bazı veriler isteniyor. Örneğin : Her gün 3 Vardiya çalışma yapılıyor. Tarih Vardiya Personel Sayısı 01.01.2020 1 1 01.01.2020 1...

Bazı güncellemeleri yapmışsınız ama bazıları eksik kalmış, özellikle for next döngüsünün step yani adım aralığı olmamış, bir de HT ve diğer durumlar için eklenecek sütun sayısını 1 fazla belirlemişsiniz. Onları düzelttim: Sub haftavar() Set s1 = Sheets("VARDİYA") Set s2 = Sheets("Çalışma...

Çalışma Listesi sayfasında Kasım ayına ait günler varken, Vardiya sayfasında Ocak ayının verileri olmasından kaynaklanıyor olabilir mi? :o

Herkese Günaydın. Sayın, YUSUF44 Arkadaşımızın yardımı ile geliştirmeye çalıştığım vardiya sayfasından çalışma listesi sayfasına veri aktarırken makroda aşağıdaki hatayı alıyorum. Konu hakkında yardımlarınızı rica ederim. Saygılarımla, sward175 sut = WorksheetFunction.Match(s2.Cells(gun2...

Sadece o değil, ayrıca VD isimli sütununuzu da iptal etmişsiniz. Lütfen bu değişikliklere dikkat edelim, hatanın nerde olduğunu buluncaya kadar yarım saat uğraştım. Aşağıdaki makroyu deneyiniz: Sub haftavar() Set s1 = Sheets("VARDİYA") Set s2 = Sheets("Çalışma Listesi") sonper =...

Sanıyorum sorun sadece döngü aralığının değiştirilmesiyle ilgili. Bunu sizin de yapabilmeniz lazımdı aslında, biraz dikkat ve gayretle yapabilirdiniz bence. Aşağıdaki makro uygun mu? Sub haftavar() Set s1 = Sheets("VARDİYA") Set s2 = Sheets("Çalışma Listesi") sonper = s1.Cells(Rows.Count...

Dediğiniz gibi ekli ancak yine aynı sorun oluyor. Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim tr1 As Date, tr2 As Date Dim s2 As Worksheet, x As Long, tr() Dim a As Long, p As Long, j As Range, c As Long Set s2 = Sheets("Günlük Performans") Application.Calculation =...

...vardiyayı oturtmam gerekiyor ve işin içinden çıkamadım. şöyle ki çalışma saatlerimiz 8 saat üzerinden 3 vardiya şekilnde çalışıyoruz vardiya çalışma saatlerimiz şu şekilde; 07:00 - 15:00 15:00 - 23:00 23:00 - 07:00 şeklinde fakat bu özel durumu olan arkadaşımız 2 ay boyunca sadece 07:00 -...

Private Sub Worksheet_Change(ByVal Target As range) If Intersect(Target, [e1]) Is Nothing Then Exit Sub Dim BUL As range, _ Adr As String, _ sat As Long, _ sv As Worksheet Set sv = Sheets("PERSONEL") Set sb = Sheets("Servis_Bul") 'Suzlerikaldir...

7 kişi ile 3 vardiya çalışma listesi hazırlamak istiyorum. İsimleri çalışma sayfasına yazdığımda, çalışma gününün 7. günü hafta tatili olacak şekilde vardiya listesi. Vardiyalarda kişileri sürekli haftalık olarak 08:00/16:00 - 16:00/24:00 ve 24:00/08:00 değiştirecek. Özellikle 16:00/24:00...

Aşağıdaki makroyu deneyiniz: Sub haftavar() Set s1 = Sheets("VARDİYA") Set s2 = Sheets("Çalışma Listesi") sonper = s1.Cells(Rows.Count, "A").End(3).Row s2.Range("C6:AN45").ClearContents s2.Range("C50:AN89").ClearContents For gun1 = 3 To 29 Step 13 For gun2 = 3 To 47 Step 44 ht =...

Aşağıdaki makroyu deneyiniz: Sub haftavar() Set s1 = Sheets("VARDİYA") Set s2 = Sheets("Çalışma Çizelgesi") songun = s2.Cells(Rows.Count, "A").End(3).Row sonper = s1.Cells(Rows.Count, "B").End(3).Row - 19 s2.[C6:R53].ClearContents For gun = 6 To 48 Step 7 ht = 0: yi = 0: vd = 0: r = 0...

Öncelikle herkese merhaba bu konuda bende program arayışı içerisindeyim ama belirlediğim bir program bulamadım. Benim projemde Laboratuvar personeli 8 yıllık çalışma 3 vardiya (08-16 16-24 24-08) şeklinde vardiya listesi var. Vardiyalar iki haftada bir arada olacak ve personellerin bir kısmı...

Merhaba 2 sayfadan oluşan bir çalışma kitabım var. 1.sayfadaki A sütünunda yer alan verileri benzersiz olarak 2.sayfadaki A sütununa isim olarak B sütununa ise 1. sayfa A sütununda girilen verinin kaç defa tekrar ettiğini sayısal olarak yazdırıyor. Buraya kadar Sayın @ÖmerBey ve Sayın @çıtır...

Merhaba Arkadaşlar bir konuda desteğinize ihtiyacım var ekte yüklediğim excelde yeşil ile belirttiğim alanda personellerin toplam çalığı haftalık saati gösteriyor şöyle bir sorunum var günlerden birine personele izin yazdığımda saat girmediğim için formül bozuluyor Uğur isimli personele perşembe...

Merhaba, Elinde bu iş için hazırlanmış bir çalışma olan arkadaşımız var mı bilmiyorum ama işlerin akışını hızlandırmak adına size birkaç soru ve önerim var. Öncelikle; - Kaç personel servis kullanacak? - Kaç servisiniz mevcut? - Servislerinizde kaç koltuk mevcut? - Servis tam dolu olarak mı baz...

Tarihi oluşturan yıl ve ay ile, bu tarihlerin haftasonu/resmi tatil kontrolü yapılarak çalışma günlerine hangi harflerin yazılacağı/yazılmayacağını belirleyen vardiya başlangıç harfindeki değişiklik tüm Xlerin konumunu değiştireceğinden bunu önerdim. Yani yıl, ay ya da vardiya harfi...

Mrh. Makro ile işlem yaptığım bir çalışma sayfam var. Bu çalışma sayfasında tarihler 01/01/2018 şeklinde olmazsa makrolar tarihleri (örn;01.01.2018) görmüyor. İdris Bey dediğiniz şekilde yaptım ama bazı hücredeki tarihler değişmedi. Ayrıca her nekadar dediğiniz yöntem tarihleri 01/01/2018...

Sayın sward175, Sizin orijinal formülünüzü kontrol etmeden; sadece VARDİYA sayfasında C1:AG1 de "B" yazmasına koşul getirmiştim. Şimdi kontrol ettiğimde, formülünüzde bu eksiği farkettim. Uygulanan formülde sorunlu günler , mesai saatleri "22-06" dir. Bu saat aralığında 8 saat çalışma olmasına...