...de hata vermiyor; fakat 752-753-755 de hata veriyor. Dosyanın çalışmasını aşağıda anlatıyorum.
Sayfa2 de bulunan ilk tabloda süre-vardiya ve sadece ilk satır için başlangıç değerleri giriliyor.
Vardiyaya göre Sayfa1 de bulunan tablolarda önce başlangıç tarihinin düşeyara sayı karşılığı...
...RemoveItem denedim ama beceremedim.
Sub nobetremoveitem()
Dim s2 As Worksheet, son As Long, y As Long, c As Long
Set s2 = Sheets("vardiya")
son = s2.Cells(Rows.Count, "B").End(3).Row
For y = 1 To 31
On Error Resume Next
pntjform.Controls("Combobox" &...
Merhaba,
Excelde bir iş planı tablosu oluşturuyorum. Bu tabloda, haftada 6 gün (Pzt-Cmt) 3 vardiya çalışan makineler için iş başlangıç tarihi ve saati (vardiyası) verildiğinde işin biteceği tarihi ve saatini (vardiyasını) hesaplatmak istiyorum. Bu işlemi vardiya değişkeni olmadan sadece günlük...
6 kişilik bir ekibimiz var 2 li vardiya düzeninde nasıl bir sistem yapabiliriz? Birde 2 kişiyi geceye sabitleyip öyle bir düzende nasış bişe yapabiliriz yardımcı olabilirmisiniz?
...masa üstünde aşağıdaki şekilde bir klasör oluşturur, klasör varsa geçer. 'xxxxxx = senin kullanıcı adın
C:\Users\xxxxxx\Desktop\Üretim Vardiya Raporları
İstediğin bu mu?
Eğer C:\Users\xxxxxx\Desktop\Üretim Vardiya Raporları\ şekide istersen kodun sonuna &Application.PathSeparator...
Merhaba,
İlginize teşekkür ederim.
Uyarlama yapamadım. " = C:\Users\xxxxx\Desktop xxxxx= Kullanıcı adı " kısmında hata veriyor ve " \ " işaretliyor.
Amacım oluşturulan klasörü bir üst klasörde toplamak.
Birden fazla bilgisayarda kullanılcağı için her bilgisayarda kodlarda ayrıca...
...uyarlarsınız.
Yol = CreateObject("WScript.Shell").SpecialFolders("Desktop") & _
Application.PathSeparator & Year(Date) & " Üretim Vardiya Raporları"
'Yukarıdaki Yol değişkenine atadığınız kod, aşağıdaki şekide oluşan parçaların birleşmesinden oluşur...
Merhaba,
Ekli kod ile masaüstünde Üretim Vardiya Raporları klasörünü oluşturup, raporu bu klasöre kaydediyor. Birden fazla rapor olduğu için tek klasörde "Raporlar" toplamak istiyorum. Masaüstüne Raporlar/ Üretim Vardiya Raporları
Şu kısımda nasıl bir değişim yapmalıyım ? Yol =...
...B4, B5 bu hücrelerde ya Off yazıyor ya da bir birinden değişik şekiller de örn.(09:00 - 18:00, 09:30 - 18:30) bu şekilde değişken bir sürü vardiya yazıyor.
Benim istediğim eğer formülü ile şunu yazdırmak.
B2 hücresinde Off yazıyorsa 0(Sıfır), hücre boşsa yine sıfır bunun dışında ne yazıyorsa...
Merhaba arkadaşlar;
Elimde bir vardiya datası var ama aynı hücre içinde text tarih vardiya başlangıç ve vardiya bitiş saatleri var ama bana sadece ayrı hücrelerde vardiya başlangıcı ve bitişi çıkarmak istiyorum left ve right formülünü kullanınca olmuyor çünkü bazı saatler 7:00 bazıları 10:00...
merhaba,
a kolonu tarihleri,
b kolonu işe başlama saati,
c kolonu vardiyanın bitiş saatini,
d kolonu ise o makina için günlük vardiya süresini göstermektedir.
e kolonu birşey ifade etmemektedir.
h1 hücresine o makinada üretilecek parça için işin başlayacağı günü ve saati göstermekteyiz.
h2...
...Dim ws As Worksheet
Dim s As Byte
Dim Rng As Range
Set WB1 = ThisWorkbook
Set WB2 = Workbooks.Open(ThisWorkbook.Path & "\vardiya.xlsx")
' Buraya dosya yolu yazınca Dosya bulunamadı hatası veriyor
Set ws = WB1.ActiveSheet
ws.Cells.Clear
s =...
Pek anlamam VBA dan ama Module de ekledim olmadı. Masaüstündeki vardiya dosyasını yazdım, hatta acaba dosyayı açmam mı gerekiyor diye vardiya.xlsx dosyasını da açtım yine olmadı.
Bir video ekleyerek anlatma şansınız varmı?
Selamlar
sayın @burcu016 formumuza hoş geldiniz. Formumuzda hiçbir karşılık gözetilmeksizin bilgisi olan tüm arkadaşlarımız herkese yardımcı oluyorlar.
sizde isteğiniz olan bu konu hakkında örnek bir dosya hazırlayarak harici dosya yükleme sitelerinden birine kaydederek Link verirseniz zaten...
merhabalar iş yerinde vardiya listesini sisteme yüklüyorum ve ay sonunda 70 küsür kişiyi mevcut listemle check etmem gerekiyor değişiklikler sebebiyle. Bu iki excel dosyasında ki stunları karşılaştırmak arada farklılık olanları renk farklılığı yapmak mümkün müdür acaba?
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.