• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

userform kaydettiğim son haliyle açılsın

hocam zaten önemli olan bu :) ben bir örnek yaptım. şifreli bir buton bıraktım. sanırım orayı incelerseniz daha iyi anlaşılacağım umarım. :) ben bir buton yardımıyla yaptım. userform 1 üzerinde incelerseniz fark edeceksiniz olayın ince detayını.

http://dosya.co/0z3kdbcp29he/NÜMİSMAT2.xlsm.html

buton şifresi: 2323
 
hocam zaten önemli olan bu :) ben bir örnek yaptım. şifreli bir buton bıraktım. sanırım orayı incelerseniz daha iyi anlaşılacağım umarım. :) ben bir buton yardımıyla yaptım. userform 1 üzerinde incelerseniz fark edeceksiniz olayın ince detayını.

http://dosya.co/0z3kdbcp29he/NÜMİSMAT2.xlsm.html

buton şifresi: 2323

Tekrar ediyorum: Yapmak istediğiniz şey için 90 userform çok fazla. Amaç eğer kayıt altına almak ve bu kayıtları görüntülemek ise 2 tane userform işini görür.

Aksi takdirde ne olur?
Her userform için userform1'de yaptığınız işi tekrar yapmak zorunda kalacaksınız. Buna gerek var mı?

Elinizdeki her para için ama her para için, para aynı, tarihi farklı bile olsa, bir kayıt oluşturmak, daha pratik görünüyor bana.

Kilitleme olayını kayıtlar değiştirilmesin diye istiyorsanız, programa girişti şifreli hale getirmek mümkün zaten.

Son olarak: Önerim geçerli, bahsettiğim şekilde çalışan bir program yapmak çok zaman almaz.
 
hocam elbetteki en iyisini siz bilirsiniz. sizin dediğiniz gibi çok daha az userformla iş görmek daha iyi elbette. sizden ricam saygodeğer hocam öyle bir program yapabilirmiyiz? vaktiniz almıycaksa. bende onun üzerinde inceleyip eksik gördüğüm varsa bildirsem çok daha güzel olur sayın hocam. üstad sizsiniz :)
 
hocam elbetteki en iyisini siz bilirsiniz. sizin dediğiniz gibi çok daha az userformla iş görmek daha iyi elbette. sizden ricam saygodeğer hocam öyle bir program yapabilirmiyiz? vaktiniz almıycaksa. bende onun üzerinde inceleyip eksik gördüğüm varsa bildirsem çok daha güzel olur sayın hocam. üstad sizsiniz :)

Bilgi edinmenin sınırı yoktur; dolayısıyla "üstad" gibi hitap tarzları bu kaideye göre yerinde olmaz. İkincisi; ben henüz bu işlerin çok başındayım. Ama size bahsettiğim şekilde bir program hazırlayacak kadar öğrendim, hepsi bu kadar.

Bahsettiğim şekilde bir çalışma yapıp burdan paylaşacağım. Çok uzun sürmez; belki yarın, belki yarından da yakın... :)

İyi bayramlar.
 
bedri hocam emeğinize sağlık. aslında kalıp itibariyle tam istediğim gibi olmuş diyebiliriz. aancak bazı rötuşlar gerekli.
sırasıyla bahsedeyim. :)

1) mesela 1 tl ele alalım. bu listede 1 tl bir tane varsa başka kaydetmiyor. oysaki bir çok çeşitte 1 tl var

2) mesela 1 tl tedavül tarihi yazıyoruz ancak tarih sadece bir tane giriş yapabiliyoruz oysaki o 1 tl mesela 10 yıl boyunca üretilmiş yani 10 farklı tarih sıralanmalı.

3) birde burda diyelimki tarihleri alt alta sıraladı fakat hangleri bende var hangileri bende yok bu tarihlerden yanında tik işareti olmalı var olanların.

Hocam çok mu şey istedim ben acaba :))))

bnim gönderdiğim userformda ilk sekme tamam gibi yani önemli olan esasında birde bunun ikinci sekmesi koleksiyon mevcut sekmesi yani :)
 
1- Her çeşit için yeni bir kayıt oluşturmak gerekiyor çünkü onun yeni bir resmi olacak artık. Aynı isimle veri girişini sağlamak kolay; mükerrer kayıt kontrolünü kapatınca girebilirsiniz aynı isimle. Bu kolay.

2- Açıklama seçeneğini bu yüzden ekledim. Çıkış tarihi 2000 ama 2010'a kadar üretilmişse bunu açıklama kısmına yazacaksınız.

3- Hangileri var, onu açıklama kısmından göreceksiniz. :)
 
ok anladım. aslında bende buna ek yaparak başarabilirim sanırım. aklıma bir fikir geliyor hocam siz daha iyi uygularsınız bunu şöyleki.

şimdi ben formda bir kopya gönderdim ya size yanında tarihler için textbox ve commonbox oluşturdum dikkat ettiyseniz. bu textboxlarıda sizin yaptığınız gibi excelde sıradaki hücreye nasıl aktarabilirsiniz. fakat tarihleri excelde ve arşivde bul göster kısmında yanyana değilde altalta sıralasın ve yanında var veya yok yazılarınıda karşısına yazsın ve göstersin.

nasıl fikir hocam :))
 
ok anladım. aslında bende buna ek yaparak başarabilirim sanırım. aklıma bir fikir geliyor hocam siz daha iyi uygularsınız bunu şöyleki.

şimdi ben formda bir kopya gönderdim ya size yanında tarihler için textbox ve commonbox oluşturdum dikkat ettiyseniz. bu textboxlarıda sizin yaptığınız gibi excelde sıradaki hücreye nasıl aktarabilirsiniz. fakat tarihleri excelde ve arşivde bul göster kısmında yanyana değilde altalta sıralasın ve yanında var veya yok yazılarınıda karşısına yazsın ve göstersin.

nasıl fikir hocam :))

Ya 30 ayrı yılda da üretilmişse ne olacak hepsine tik atmak yerine, açıklama kısmına "2000-2029 yılları arasında kullanılmıştır" şeklinde bir açıklama yazmak daha kolay değil mi?
 
bedri hocam olmuyor işte öyle. neden diyeceksiniz. bu işin inceliği püf noktası orda mesela ilk 3 yıl var sonra 2 yıl yok sonra 5 yıl daha var 1 yıl dok, ya da ters düz olayları var incelik kalınlık olayları var yani 1940 ter var ama düz yok 1941 her ikiside var bunlar düz yazıyla anlaşılması çok zor , zaman alıcı, yorucu ve inanın kimse ilgilenmez bile. ben size bir dosya daha gönderiyorum sheet 3 te detaylı görürsünüz hocam

http://dosya.co/xws16wq4lv2i/NÜMİSMAT_çalışma.xlsm.html
 
bedri hocam olmuyor işte öyle. neden diyeceksiniz. bu işin inceliği püf noktası orda mesela ilk 3 yıl var sonra 2 yıl yok sonra 5 yıl daha var 1 yıl dok, ya da ters düz olayları var incelik kalınlık olayları var yani 1940 ter var ama düz yok 1941 her ikiside var bunlar düz yazıyla anlaşılması çok zor , zaman alıcı, yorucu ve inanın kimse ilgilenmez bile. ben size bir dosya daha gönderiyorum sheet 3 te detaylı görürsünüz hocam

http://dosya.co/xws16wq4lv2i/NÜMİSMAT_çalışma.xlsm.html

Anladım. Kodları revize etmem gerek. Birazdan dosyayı atarım.
 
Ufak bir eksikliği var ama bu haliyle bir kontrol edin.
Yeni para girişi yaparken elinizde o paraya ait farklı yıllara ait örnekleri var ise sağdaki kutulara o tarihleri yazıyorsunuz. Aynı paraya ait farklı bir örnek için giriş yapmak mümkün artık.

Arşivden veri getirdikten sonra Mevcutları Göster dediğinde var olanların yanına tik atıyor.



http://dosya.co/5gin6qhk31xt/NÜMİSMAT_çalışma.xlsm.html
 
Son attığım linkteki dosyayı indirdikten sonra userform üzerindeki Mecvutları Göster butonuna atanan kodu (ilk satır ile son satır arasını) silip Halit3 Hoca'nın verdiği şu kodu yapıştırınız.

Kod:
For s = 7 To 44
If Controls("TextBox" & s).Text <> "" Then
Controls("TextBox" & s).Visible = True
Controls("Label" & s).Visible = True
End If
Next
 
Son düzenleme:
Bedri hocam günaydınlar. Dosyayı indirmiyor. Bi sorunmu var acaba indirme linkinde?
 
indirdim sonunda hocam. bakıyorum hemen :))
 
Geri
Üst