4 sayfadan 1. sayfa

ECYavuz - Excel VBasic Kod Bankası Pro - (5400 Kod)

İletiTarih: 21 Ekm 2008 11:16
Erhan Yavuz
Excel VBasic Kod Bankası Pro - Kod Sihirbazı (5400 Kod)

Güncellenmiştir.11.11.2008 - ECYavuz

Değerli Arkadaşlar;

Excel, VBasic, ADO vb. konuları ile ilgili 5400 kod kaydı bulunan Kod Bankası Pro ek'de kullanımınıza sunulmuştur...

Programın Hazırlanmasında ExcelVBA.net Admin ve kurucu üyelerine; özellikle Değerli Dostlarım Tarkan, Erkan ve Hakan beylere en içten teşekkürlerimi sunarım...

Bu arada bilinmesi gerekir ki; 5400 adet Kod örneği aslında tüm Excel dostları ve Excel Gönül verenlerinin eseridir... Diğer bir değişle Bu Bankada herkezin az çok bir hesabı ve yatırımı vardır. Bu nedenle Kod Bankası Pro bir yatırım aracıdır, en azından bilgi dağarcığı açısından... Güzel bir Arşivdir.

Programın ana yapısında ADO kullanılmıştır, birçok bildiğiniz bilmediğiniz özellik eklenmiştir. Tabii bu da yoğun bir References anlamına gelmektedir ne yazık ki;
Bu nedenle aşağıda resimde göreceğiniz .ocx ve .Dll leri kullanıma almanız gerekecektir. Bu konuda izlenecek yol sitemizde son derece açıklayıcı bir şekilde örnekleri ile anlatılmıştır.


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.


Diğer Kod Bankası V3.0 da kullanılan Lisans yapısı bu programda kullanılmamıştır. Bu nedenle aşağıdaki ekran çıktığında "Demo Programıdır" tuşunu tıkladığınızda Program çalışacaktır.


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.


Ana Program 600 Kb lık bir program olup, Data.mdb dosyasında kayıt altında tutulan Kod Örneklerini sergiler. Bu nedenle Data.mdb dosyası ile Kod Bankası pro'nun aynı yerde olmaları gerekir. Ancak bu unutulmuş olsa dahi; bir hataya meydan verilmemesi için program kendi Data.mdb sini kendi oluşturmaktadır.
Bunun diğer bir anlamı Kod Bankası Pro'yu kendi bilgi bankanız için de kullanabilirsiniz demektir.

ECYavuz Presents


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.





Kodların bulunduğu veritabanını indirmek için tıklayınız.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 11:26
Erhan Yavuz
Excel VBasic Kod Bankası Pro - Kod Sihirbazı (5400 Kod)

Yapabilecekleriniz:

Kod Bankası Pro ile;

1. Kodları incelersiniz...
2. Kodlarda Değişiklik Yapabilirsiniz...
3. Kodları silebilirsiniz...
4. Yeni Kod yazıp ekleyebilirisiniz..
5. Web sayfasından, Text dosyasından Kod alıp kaydedebilirsiniz...
6. Seçtiğiniz Kod'e Word ve Text sayfasına aktarabilir, başka yerde kullanabilirsiniz..
7. Kod Bankanızı Data.mdb dosyasından Ana Programınıza alabilir, daha sonra tekrar başka bir bilgisayarda Data.mdb dosyası oluşturup içine kaydedebilirsiniz...
8. Kodları incelerken, Sayfa, Modül ve UserForm kodları olmasına bakmaksızın seçtiğiniz kodu örnek dosya haline getirip inceleme fırsatınızı yaratırsınız...
9. Özellikle UserForm lu örneklerde; Seçtiğiniz kod'da kullanılan UserForm Nesnelerini otomatik sizin için oluşturan Sihirbazını kullanabilirsiniz...


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.



Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 11:35
Erhan Yavuz
Excel VBasic Kod Bankası Pro - Kod Sihirbazı (5400 Kod)


Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.



Kod Bankası Pro da; birçok Kod yazım özelliği ve sistemi kullanılmış olup, Buton ile komut sisteminin yanında Menü sistemi de kullanılmıştır.

Çok Ayrıntılı Bir Arama Sistemi;

Kod Arama veya başka bir amaç için kullanıldığında kaydedilen bilgiler çok hızlı ve çok ayrıntılı bir arama sistemi ile taranır. Kayıt sırasında daha önceden kaydedilmiş bilginin mükerrer olmaması için değişik ve ADO sisteminde olmadığı halde Tarkan ve Hakan arkadaşlarımızca oluşturulan bir sistemde kod taraması yapılır.

Günlük USD ve Euro alış ve Satış tutarlarını bile öğrenebilirsiniz...

Şimdilik Gmail kullanılsa da eğer bir gmail hesabınız varsa istediklerinize mail atabilir, seçtiğiniz kod veya sakladığınız diğer bilgiyi mail yolu ile gönderebilirsiniz.
Şu an seçilen bilgi tek satır olarak gönderiliyor olsa da Tarkan Arkadaşımızın bu konuyu halledeceğimden eminim...

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 11:44
Erhan Yavuz
Excel VBasic Kod Bankası Pro - Kod Sihirbazı (5400 Kod)

Bu iş nereye kadar Gidecek;

Kadar kısmını bilemem ama siz Kod Bankasını Kullanırken ben Değerli Dostum Erkan beyin yaptığı, ADO sistemi ile Excel de dosya oluşturup çalıştırma konusunu sadece seçerek Kod Bankasının Sihirbazına yaptırmaya başlayacağım...

Kod Bankası Pro da daha önce indirmiş olup kullandığınız Data.mdb dosyalarınızı kullanabilirsiniz... Tarkan beyin halen incelemekte olduğu 5400 kodluk yeni Data.mdb dosyasıda bu konuya hemen eklenecektir.

Bu arada Data.mdb dosyanız yoksa da dediğim gibi Program kendisi için küçük çaplı bir tane kendisi oluşturmaktadır...

Hepinize İyi kullanımlar; Emeği geçen, saattlerini benim nazım için harcayan, of demeden yardımcı olan tüm arkadaşlara teşekkürlerimi, kod larını bankaya yatırdığım ve sizlerin beyenisine sunduğum tüm uzman ve excel hocalarıma da gösterdikleri anlayış için minnettarlığımı sunarım....

Saygılarımla... Erhan Yavuz..ECY Presents

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 11:59
Erkan Akayay
Erhan bey yukarıdaki resimdeki örnek , tahmin ettiğim projenizle ilgili galiba , ona ne zaman başlıyoruz ?

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 12:06
Erhan Yavuz
Hemen Sevgili Dostum Hemen...

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 12:08
Erkan Akayay
Dosya ilk mesaja eklenmiştir.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 18:12
hsayar
Compile Error Hidden MOdule1
excel 2007 için.
vbe şiresini verebi,lirseniz sevinirim.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 18:19
ismailmuhcu
Çok güzel oldu. Tüm yardımı ve emeği geçenlerin ellerinize sağlık...

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 18:42
hsayar

Gönderilmiş resmi tam boy görmek istiyorsanız, eklentinin üzerini tıklayınız.




Excel 2007[Ofis12) için cdo.dll 'in eşleşiği nedir?

http://www.microsoft.com/downloads/deta ... laylang=en
eklentiyi yukarıdaki linkten buldum ancak bu seferde excel 2007 de filesearch iptal edildiği için kodlar içinde onları iptal ettim bu sefer kapandı.
Ne yapılabilir.

Kod: Tümünü seç
With Application.FileSearch
    .LookIn = ThisWorkbook.Path
    .Filename = "Data.mdb"
    If .Execute < 1 Then
        MsgBox "'Data.mdb' Data Dosyası Bulunamadı..." & vbCrLf & vbCrLf & "Data.mdb Dosyası Oluşturulacaktır..." _
        & vbCrLf & vbCrLf & vbCrLf & "Sayın; " & ecyavuz & vbCrLf & vbCrLf & "Kod_Bankası_Pro ile Data Dosyasının" & vbCrLf & vbCrLf & "Aynı yerde olduklarından emin olunuz..", vbCritical + vbOKOnly, Başlık
        veriTabani = ThisWorkbook.Path & "\" & "Data.mdb"
        Dim VT As New ADOX.Catalog
        Dim Mesaj$
        Baglanti = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & veriTabani & ";"
        On Error GoTo Hata
        VT.Create Baglanti & ";Data Source = " & veriTabani
        Call TableDataYarat
    End If
End With

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 19:08
Erkan Akayay
Bildiğim kadarıyla 2007'de bu reference default olarak yok. Kullanmadım ama bu konuda bir şeyler duymuştum net hatırlamasamda. Outlook ile kurulan bir component. Ama outlook2007 ile kurulmuyor. EKte component var windows\system32 içine atıp tanıtın.

Not : Mesajınızı gördüğümde düzenlememyi yapmamıştınız . İşlerle uğraşırken geç kaldım eklenti için.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 19:12
Erkan Akayay
Erhan Bey'e danışalım. 2007 kullanan arkadaşlarda yardımcı olabilir sorun için.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 19:18
hsayar
Dolu data.mdb nerede ben göremiyorum. rar içinden çıkmadı..
2007'de Application.flie search yerine Fso.FileFolder.Exist kullanılabilir.
kendisi ekleyince doldu(kodlar aşağıda) ben elle acces belgesinin adını değiştimiştim :)

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 19:20
Erkan Akayay
Bildiğim kadarıyla data.mdb dosyasını Tarkan Bey ekleyecek.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 20:13
hsayar
EXCEL 2007 kullanıcıları Auto_Openda yer alan aşağıdaki kod dizesini;
Kod: Tümünü seç
'With Application.FileSearch
'    .LookIn = ThisWorkbook.Path
'    .Filename = "Data.mdb"
'    If .Execute < 1 Then
'        MsgBox "'Data.mdb' Data Dosyası Bulunamadı..." & vbCrLf & vbCrLf & "Data.mdb Dosyası Oluşturulacaktır..." _
'        & vbCrLf & vbCrLf & vbCrLf & "Sayın; " & ecyavuz & vbCrLf & vbCrLf & "Kod_Bankası_Pro ile Data Dosyasının" & vbCrLf & vbCrLf & "Aynı yerde olduklarından emin olunuz..", vbCritical + vbOKOnly, Başlık
'        veriTabani = ThisWorkbook.Path & "\" & "Data.mdb"
'        Dim VT As New ADOX.Catalog
'        Dim Mesaj$
'        Baglanti = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & veriTabani & ";"
'        On Error GoTo Hata
'        VT.Create Baglanti & ";Data Source = " & veriTabani
'        Call TableDataYarat
'    End If
'End With


Bunlarla değiştirniz;
Kod: Tümünü seç
veriTabani = ThisWorkbook.Path & "\" & "Data.mdb"
If Fnc_DsyaVarMi(veriTabani) = False Then
        MsgBox "'Data.mdb' Data Dosyası Bulunamadı..." & vbCrLf & vbCrLf & "Data.mdb Dosyası Oluşturulacaktır..." _
        & vbCrLf & vbCrLf & vbCrLf & "Sayın; " & ecyavuz & vbCrLf & vbCrLf & "Kod_Bankası_Pro ile Data Dosyasının" & vbCrLf & vbCrLf & "Aynı yerde olduklarından emin olunuz..", vbCritical + vbOKOnly, Başlık
        Dim VT As New ADOX.Catalog
        Dim Mesaj$
        Baglanti = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & veriTabani & ";"
        On Error GoTo Hata
        VT.Create Baglanti & ";Data Source = " & veriTabani
        Call TableDataYarat
End If


Modülün en altına da aşağıdaki fonkisyonu ekleyiniz

Kod: Tümünü seç
Function Fnc_DsyaVarMi(metin As String) As Boolean
'#############################################
'
'#### Seçilen Dosya Mevcutmu kontrol eder ####
'#### Yazar    : Hsayar    21/10/2008     ####
'#### Uyarlama : Hsayar    21/10/2008     ####
'
'#############################################
1   Dim DsSisKnt As FileSystemObject
2   Set DsSisKnt = CreateObject("Scripting.FileSystemObject")
3   Fnc_DsyaVarMi = DsSisKnt.FileExists(metin)
4   Set DsSisKnt = Nothing
End Function


ve referencese Windows Script Host Object Modeli ekleyiniz.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 21 Ekm 2008 20:49
Erhan Yavuz
Sayın hsayar yardımlarınız için teşekkür ederim. İşden eve gelinceye kadar çok yol alınmış gördüğüm kadarıyla...

Bahse konu kod kısmı Kod bankası Pro nun bulunduğu yerde Data.mdb nin olmamaması durumunda kendisinin oluşturduğu deneme amaçlı Data.mdb dosyası içindir. Tarkan beyin ekleyeceği asıl data.mdb dosyası eklendiğinde kullanılmayacaktır.

Ama yinede 2007 Excel için yaptığınız düzenleme için teşekkürler. Tabii ben 2007 kullanmadığım için böyle bir denemeyi yapma fırsatım olmamıştı. Ama her zaman dediğim gibi bu bir ekip çalışmasıdır. Bu nedenle yardımlarınız ekip ruhu içinde gerekli yere ulaşmıştır.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 22 Ekm 2008 06:46
hsayar
ECYavuz yazdı:Ama yinede 2007 Excel için yaptığınız düzenleme için teşekkürler. Tabii ben 2007 kullanmadığım için böyle bir denemeyi yapma fırsatım olmamıştı. Ama her zaman dediğim gibi bu bir ekip çalışmasıdır. Bu nedenle yardımlarınız ekip ruhu içinde gerekli yere ulaşmıştır.


eklediğim kısım hem 2007, hemde 2003 ve altında çalışır.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 22 Ekm 2008 09:39
Erhan Yavuz
hsayar yazdı:
ECYavuz yazdı:Ama yinede 2007 Excel için yaptığınız düzenleme için teşekkürler. Tabii ben 2007 kullanmadığım için böyle bir denemeyi yapma fırsatım olmamıştı. Ama her zaman dediğim gibi bu bir ekip çalışmasıdır. Bu nedenle yardımlarınız ekip ruhu içinde gerekli yere ulaşmıştır.


eklediğim kısım hem 2007, hemde 2003 ve altında çalışır.


Teşekkür Etmek Bir erdemdir.

Tarkan bey'in Data.mdb dosyasını eklemesini özlemle bekliyoruz...

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 22 Ekm 2008 10:28
Tarkan VURAL
Erhan bey, işlerim yoğun bir de dün sabahtan akşam 22 'ye kadar süren bir Ford Otosan toplantısındaydım. İnceleyemedim, ekleyemedim, ama en kısa zamanda eklerim.

Ama buraya yazılanları okuduktan sonra şunu düşündüm :
Öncelikle Data dosyasının adı ana.mdb olmalı. yada farklı bir ad. Sonradan eklenen de data.mdb olarak kalabilir...

Sistem önce 5400 kodu içeren ana.mdb dosyasını arar, bulamaz ise yeni bir Data.mdb dosyası adında dosya oluşturur.
Farz edelim ki ana.mdb dosyası yok , data.mdb oluşturdu ve çalışırken bundaki kodları alıp program üzerinde sergiledi, kulllanım maksatlarına göre sundu. Diyelim ana mdb var, o zaman yine program bu dosya içeriğini alır ve az önceki dediğim gibi sergileme yapar. Diğer yandan şöyle varsaydığımızda, data.mdb kodla oluşturuldu, ana.mdb dosyası sonradan eklendi. Dosya açılırken testleri yaptı ve ikisini de gördü. Yeni açılışta sormalı, hangisini load edelim, ana var data var, ana seçildiğinde ana, data seçildiğinde data load edilip program üzerine yüklenir. 3. bir seçenek , her ikisini de load et denilmek istenirse de bence öncelikle ana.mdb yüklenir, aynı formatlarda oluşturulmuş olması gereken data.mdb içeriği de onun devamında programa yüklenebilir durumda olmalı. İki dosyayı da ayrı ayrı sisteme adapte edebilmeli. 3. şık için epeyce revizyon gerekebilir ama ilk aşamada bence ya ana.mdb ya data mdb için sorgulama şıklarınızı yerleştirin derim.

Excel VBasic Kod Bankası Pro - Kod Sihirbazı Pro (5400 Kod)

İletiTarih: 22 Ekm 2008 12:21
Erhan Yavuz
Tarkan bey;

Aslında sizin de belirttiğiniz araştırmayı yapıyor program... ama farklı bir biçimde; açıklamaya çalışayım...

Program Data.mdb dosyasını arıyor, bulamassa program çalışması sırasında hata oluşmaması için geçici bir Data.mdb dosyası oluşturuyor. Bunu kendi içinde yapıyor, yani 5400 kodluk bir Data.mdb dosyası yerine 15 kodluk küçük bir örnek. Bu geçici oluşturulan dosyanın aslında bir işlerliği yok. Yani demek istediğim Ana.mdb veya data.mdb diye iki dosyaya gerek yok diye düşünüyorum. Data.mdb yoksa hata vermesin diye kendi .mdb sini kendi oluşturuyor o kadar.

Eğer kullanıcı kendi Data.mdb dosyasını oluşturmak istiyor ve benim topladığım kodları değilde kendi topladıklarını kullanmak istiyorsa da, işte baştan 15 kodluk örnek dosyaya kavuşmuş oluyor. Kendi arşivini kendisi baştan yapabiliyor...