Kontrol Plani

[muhammethezer]

Hayırlı hafta sonları dileklerimle;
Sayın Leventm'nin sunmuş olduğu bir dosyanın üzerinde biraz değişiklik yapmak istiyorum.Yapmak istediğim "KLASÖR OLUŞTUR" butonuna bastığımda "CheckBox" lardan yapılacak seçim doğrultusunda "C:\\Belgelerim\" veya "D:\\Belgelerim\" klasörü içinde Userform üzerinde bulunan TextBox'ta yazmış olduğum klasör ismine göre dosya oluşturmasıdır.Teşekkür ederim.

 

[muhammethezer]

üstteki dosya için yardımcı olabilirmisiniz.Teşekkür ederim

 

[Levent Menteşoğlu]

"C:\\Belgelerim\" veya "D:\\Belgelerim\" klasörü içinde Userform üzerinde bulunan TextBox'ta yazmış olduğum klasör ismine göre dosya oluşturmasıdır.

Yukarıda mavi renkle işaretlediğim cümlenizde sanıyorum bir ifade hatası var. Siz textboxa yazılan isimde klasörmü oluşturmak istiyorsunuz yoksa belgelerim klasöründe bir dosyamı oluşturmak istiyorsunuz.

 

[muhammethezer]

Evet sayın Leventm dosya oluşturmak istiyorum

 

[Kemal Demir]

Merhaba,

Private Sub CommandButton1_Click()
MkDir TextBox1
End Sub


yukarıdaki kodu kullanınız.

 

[muhammethezer]

TeŞekkÜr Ederİm Sayin Kemal Demİr.

 

[muhammethezer]

kontrol planı

Hayırlı akşamlar dileklerimle ;
Ekye sumuş olduğum dosyada Sayfa İşlem 1 ' de bulunan ComboBox'tan seçilen Firma ismine karşılık gelen Sayfa1 A 'da bulunan verileri almak istiyorum ama bir türlü başaramadım hata mesajı veriyor.

 

[muhammethezer]

ilk = WorksheetFunction.Match(ComboBox1, s1.[m:m], 0) 1004 hata mesajı veriyor.Nasıl düzeltebilirim .

 

[muhammethezer]

bir üstteki dosya da oluşan macth hatası hakkında yardım alabilirmiyim.

 

[muhammethezer]

kontrol planı

Merhaba , herkse hayırlı akşamlar dilerim.Ek dosyada yapmak istediğim bir değişiklik var .İlk değişiklik UserForm üzerinde FİRMA ADI ComboBOx'tan seçim yapmadan "önce dosya oluştur" mesajının çıkması;daha sonraki işlem seçenekler sayfa işlem 1'de bulunan checkox'lardan yapılan seçim doğrultusunda Excel Sayfasında "sayfa1" deki formu otomatşk olarak checkBox'lardan yapılan seçim doğrultusunda otoatik olarak hazırlaması.Formda bir örnek görmüştüm ama aradım bir türlü bulamadım.Teşekkür ederim.

 

[Levent Menteşoğlu]

ilk = WorksheetFunction.Match(ComboBox1, s1.[m:m], 0) 1004 hata mesajı veriyor.Nasıl düzeltebilirim .

Bu hata mesajı veri bulunamadığında fonksiyonun hata döndürmesinden kaynaklanıyor. Kodların başına "on error resume next" satırını ilave edin.

 

[Levent Menteşoğlu]

İlk değişiklik UserForm üzerinde FİRMA ADI ComboBOx'tan seçim yapmadan "önce dosya oluştur" mesajının çıkması

Aşağıdaki kodu userformun kod sayfasına kopyalayın.

Private Sub ComboBox1_Enter()
MsgBox "Önce dosya oluştur"
End Sub

Diğer sorunuzu biraz daha açarmısınız.

 

[muhammethezer]

tabiki sayın leventm yapmak istediğim form üzerinde bulunan firma ismini seçtiğimde seçenekler sayfa işlem 1'de bulunan checkox'lardan seçim yaptığımda "oluştur" butonuna bastığımızda excel sayfasında "sayfa1" deki form şablonunu otomatik olarak hazırlaması

 

[muhammethezer]

kontrol planı

tabiki sayın leventm yapmak istediğim form üzerinde bulunan firma ismini seçtiğimde seçenekler sayfa işlem 1'de bulunan checkox'lardan seçim yaptığımda "oluştur" butonuna bastığımızda excel sayfasında "sayfa1" deki form şablonunu otomatik olarak hazırlaması

hayırlı akşamlar dileklerimle

 

[Levent Menteşoğlu]

Ben formun nasıl oluşturacağını anlayamadım. checkboxlardan bazılarını işaretlediğinizi farzederek formun nasıl oluşturulacağını izah edermisiniz.

 

[muhammethezer]

Önelikli olarak kolay gelsin dileklerimi sunmak istiyorum Sayın Leventm;
Çalışmakta olduğum şirkette ISO KALİTE programı dâhilinde Kontrol Planı yazmam gerekiyor. İşlerimi daha kolay hale getirebilmek için “sayfa1” de bulunan şablon üzerinde belirli işlem aşamaları bulunuyor. Sabit kalmasını istediğim kısım “GİRİŞ KONTROL” kısmıdır. İkincisi ise yine “GİRİŞ KONTROL” de bulunan yapışkan kısmının seçime bağlı olarak çıkması. Tüm bunların haricinde ise yapılan seçim
Örnek verirsem;
1. Giriş Kontrol 9 satır olacak.
2. Laminasyon 5 satır olacak.
3. Bant Kesim 9 satır olacak
4. Son Kontrol 6 satır olacak
5. Ambalaj 4 satır olacak
6. Ürün denetimi 2 satır olacak
olacak şekilde boş Excel sayfasına şablon oluşturmak istiyorum.

1. Giriş Kontrolde bulunan “Yapışkan” kısmının
6. Ürün Denetimi kısmının
eğer ürün yapışkansız ise sayfada olmaması gerekiyor.
Yukarıdaki örnekte de anlattığım gibi CheckBox’lardan seçim değiştikçe
Örnek verirsem;
1. Giriş Kontrol
2. Bant Kesim
3. Son Kontrol
4. Ambalaj
5. Ürün denetimi
gibi oluşan form üzerinde 1 numara sabit kalacak ve diğerleri seçime göre değişecek.

Şerit Testere 5 satır olacak
Pres 7 satır olacak
Şablon Kesim 2 satır olacak
Teşekkür eder Saygı ve Sevgilerimi sunarım.

 

[muhammethezer]

merhaba , acaba mesajımı okuyabildinizmi syın levenym

 

[muhammethezer]

merhaba , acaba mesajımı okuyabildinizmi sayın leventm

 

[Levent Menteşoğlu]

Mesajınızı elbette okudum ama hala ne yapmak istediğinizi kestiremedim. Öncelikle Kontrol planındaki aşağıda belirttiğiniz her süreç için satır sayılarını içeren bir tabloyu eklemelisiniz. Ondan sonra checkboxlara bu satırları gizleyip açan kodlar yazılabilir. İstediğiniz böyle birşeymi? Eğer böyleyse örneğin laminasyon checkboxına aşağıdaki kodu yazarak çalışmasını inceleyin.

Private Sub CheckBox2_Click()
Rows("24:28").EntireRow.Hidden = True
If CheckBox2.Value = True Then Rows("24:28").EntireRow.Hidden = False
End Sub

 

[muhammethezer]

kontrol planı

hayırlı hafta sonları dileklerimle ; Sayım Leventm önermiş olduğunuz kodu sayfa üstüne CheckBox eklediğimde çalışıyor ama User Form üzerinde seçim yaptığımda çalıştıramadım..Bir de şablonun ikinci sayfaya taşmamasını nasıl sağlayabilirim ; ikinci sayfaya taşsa bile "VERİ AKTARIM SAYFASI" üzerinde "SARI" renkte belirlemiş olduğum başlık ikinci veya üçüncü sayfada da otomatik olarak çıkmasını nasıl sağlayabilirim.Teşekkür ederim.