Her açılışta "Bazı öğelerde sorunlarla" Karşılaştık Hatası

[Astalavista58]

Merhaba herkese hayırlı günler dilerim kendimce internetten videolar izleyerek, forumlarda konuları inceleyerek bir program hazırlamaya çalışıyorum. Bugün bir sorunla karşılaşmaya başladım. Dosyayı her açtığımda "Bazı öğelerde sorunlarla karşılaştık....." gibi hata alıyorum. Dosyayı onarıp açıp farklı kaydediyorum ancak farklı kaydettiğim dosya da hata veriyor. Bir türlü çözemedim.
Birde ListBoxtan çift tıklama ile ComboBox'a veri alırken hata alıyorum. Kendimce dosya üzerinde bayağı uğraştım zamanım boşa gitmesin istiyorum, yardımlarınızı bekliyorum.

kullanıcı adı : 1
şifre: 1

 

[Muzaffer Ali]

Merhaba.
Gerekli kod düzenlemelerini yaptım.

İlk açılıştaki hata excelin içinde bulunan bazı hatalardan kaynaklanıyor.
Onu da şu şekilde çözdüm.
Dosyanızdaki sayfaları, tüm kodları ve formları yeni bir Excel dosyasına kopyaladım.

İleride benzer bir hata ile karşılaşırsanız siz de böyle yaparsınız.
Sayfa kopyalamayı zaten biliyorsunuzdur. Form kopyalamak için önce VBA.Project kısmında formun adını sağ tıklatıp Export seçin.
Daha sonra yeni dosyada VBA-Project kısmında herhangi bir yeri sağ tıklatarak Import seçin.

 

[Astalavista58]

Merhaba.
Gerekli kod düzenlemelerini yaptım.

İlk açılıştaki hata excelin içinde bulunan bazı hatalardan kaynaklanıyor.
Onu da şu şekilde çözdüm.
Dosyanızdaki sayfaları, tüm kodları ve formları yeni bir Excel dosyasına kopyaladım.

İleride benzer bir hata ile karşılaşırsanız siz de böyle yaparsınız.
Sayfa kopyalamayı zaten biliyorsunuzdur. Form kopyalamak için önce VBA.Project kısmında formun adını sağ tıklatıp Export seçin.
Daha sonra yeni dosyada VBA-Project kısmında herhangi bir yeri sağ tıklatarak Import seçin.

Sayın hocam Allah sizden bin kere razı olsun bana o kadar yardımcı oldunuz ki ne kadar teşekkür etsem azdır tekrardan çok çok teşekkür ederim.

 

[Astalavista58]

Sayın hocam frmSilah formunu çalıştırıp, listboxatan double click yapıp, kaydettiğimde tekrar aynı hatayı vermeye başlıyor. Debug dediğimde ThisWorkbook.Save hata olduğunu gösteriyor, bunu neden yapar acaba

 

[Muzaffer Ali]

Doğru mu anladım?

Listboxt listesinden herhangi birine çift tıklıyorsunuz, daha sonra KAY butonuna tıklıyorsunuz.

Bunu 2. mesajda eklediğim dosyada denedim ama hata vermiyor.

 

[Astalavista58]

Doğrudur hocam sizin eklediğiniz üzerinden deniyorum ama yine Bazı öğelerde sorunlarla karşılaştık .. hatası veriyor. Benim bilgisayar ile alakalı galiba. Biraz daha araştırayım, bir sonuca varamazsam baştan yapacağım artık

 

[Astalavista58]

Sayın hocam problemi bayağı bir araştırma neticesinde tespit ettim. Yine sizin yardım etmiş olduğunuz Listboxta Açılınca Tarihi Göre Sıralama konusunda vermiş olduğunuz kodda Sıralamayı Temizle bulunmuyormuş, bu sebeple Thiswoorkbok.Save ve ActiveBook.Save komutlarına gelince kod hata veriyor. Bende bu komutlardan önce ....Sort.SortFields.Clear formülünü kullanarak sorunu çözdüm. Yardımlarınız için tekrardan teşekkür ederim.

 

[Muzaffer Ali]

Office versiyonundan mı kaynaklı acaba bilemedim. Bende sıralamayı temizlemeyince de hata vermiyor.
Sorunu çözmenize sevindim. Kolay gelsin.