- Katılım
- 18 Ekim 2022
- Mesajlar
- 11
- Excel Vers. ve Dili
- sürüm: 2209 dil: Türkçe
Herkese merhabalar. ben şöyle bir çalışma yapmak istiyorum. Fabrikamın bir prosesinin her vardiyasının verilerini (Tarih, Vardiya, Operatör-1, Operatör-2 ve verimlilik) kaydedeceğim. Dosya linki aşağıdadır.
1-) Tarih kısmını alt alta şu kod ile kaydedebiliyorum;
'Tarih
If Range("D2").Value = "" Then Exit Sub
i = Sayfa3.Cells(Rows.Count, "A").End(3).Row + 1
If i < 3 Then i = 3
Sayfa3.Cells(i, "A") = Range("D2").Value
2-) Vardiya ve operatör kısmında ise takıldım. Çünkü bunları Verimlilik-geçmiş sayfasında 1. vardiya'yı 1. vardiya, 2. vardiya'yı 2. vardiya ve aynı şekilde operatörü de.. kaydetmesini istiyorum.
Yani Üretim adetleri sayfasındaki vardiya bilgisine hangi vardiya yazılmışsa diğer sayfadaki ilgili bölüme yazdırmasını istiyorum.
Her gün 1., 2. ve 3. vardiya verimlilikleri ve vardiyalarda çalışan operatörlerin isimleri kaydedilecektir.
Yardımlarınız için şimdiden teşekkür ederim..
docs.google.com
1-) Tarih kısmını alt alta şu kod ile kaydedebiliyorum;
'Tarih
If Range("D2").Value = "" Then Exit Sub
i = Sayfa3.Cells(Rows.Count, "A").End(3).Row + 1
If i < 3 Then i = 3
Sayfa3.Cells(i, "A") = Range("D2").Value
2-) Vardiya ve operatör kısmında ise takıldım. Çünkü bunları Verimlilik-geçmiş sayfasında 1. vardiya'yı 1. vardiya, 2. vardiya'yı 2. vardiya ve aynı şekilde operatörü de.. kaydetmesini istiyorum.
Yani Üretim adetleri sayfasındaki vardiya bilgisine hangi vardiya yazılmışsa diğer sayfadaki ilgili bölüme yazdırmasını istiyorum.
Her gün 1., 2. ve 3. vardiya verimlilikleri ve vardiyalarda çalışan operatörlerin isimleri kaydedilecektir.
Yardımlarınız için şimdiden teşekkür ederim..
dnm.xlsx
Üretim Adetleri HİDROSTATİK BASINÇ TESTİ ÜRETİM ADETLERİ TABLOSU TARİH VARDİYA OPERATÖR -1 OPERATÖR - 2 NO,Müşteri NO, NO,ÇAP,HİDROSTATİK BASINÇ TESTİ - 1,HİDROSTATİK BASINÇ TESTİ - 2 Test Edilen Adet ,Test Edilen Adet 1,xxxxxxx,xxxxxxx,Ø206 2,xxxxxxx,xxxxxxx,Ø246 3,xxxxxxx,xxxxxxx 4,xxxxxxx,xx...