Soru 2 EXCELL BİRLİKTE ÇALIŞTIRMA

[efek_01]

Merhabalar,

Userform ile açılan bir excelim var. Bu excel tek başına çalıştığında sorunsuz çalışabiliyorum. Ancak önce veya sonra başka bir excel açtığım zaman userform aktif sayfayı sonradan açtığım sayfa olarak algılıyor. Örneğin userform içinde combobox içerisindeki bir kod;
- ad=Thisworkbook.Name
Workbooks(ad).sheets(ComboBox4.Value).select
....
olmasına rağmen sonradan veya önceden açtığım çalışma kitabının içerisinde o sayfayı arıyor ve haliyle userform hata konumuna geliyor.
Nasıl bir yol izlemeliyim?

Not: Kodu "Thisworkbook.Sheets(ComboBox4.Value).Select" olarak da denedim.

İyi Forumlar..

 

[Muzaffer Ali]

Merhaba.

Thisworkbook.Sheets(ComboBox4.Value).Select

bu satır hata veriyorsa ComboBox4.Value de yazan isimde bir sayfa yok demektir yada bu sayfa gizlidir. Bundan başka bir sebeple hata vermesi için sheets_select olayında kod varsa belki orası hata veriyordur. Bu satır başka bir dosyanın açık olmasından etkilenmez.

Her neyse dosyanızı görmeden çözüm sunmak zor.
Dosyanızı ekleyin kontrol edelim.

 

[efek_01]

Hocam sorun şurda yaşanıyor.
Örneğin;
- A isimli bir boş excele çift tıklayarak açıyorum.
- Ardından kendi başlangıçta userform ile açılan excelimi açıyorum.
- Userform ekrana geliyor arkada A isimli excel kitabı açık görünüyor.
- Kendi userformumda ComboBox kendi çalışma kitabımdan 'KTarihler'!b3:b365 Rowsource ile veri alıyor.
- Ancak userformum başlarken çalışma kitabı gizlendiği için "KTarihler" isimli sayfayı göremiyor.
Zaten görmediği için de comboboxtan veri seçemiyorum...

 

[efek_01]

Bilgisayarın başına geçince atıcam.

 

[efek_01]

a

 

[Muzaffer Ali]

Bir sayfadan veri okumak yada yazmak için seçmenize (.select) gerek yok.
direk yazabilir yada okuyabilirsiniz.
Örnek Thisworkbook.Sheets(ComboBox4.Value).range("A1")="Test" sayfa seçili olmasa da A1 hücresine test yazar.
Thisworkbook.Sheets(ComboBox4.Value).Select yazmanıza gerek yok.

 

[Furkan TARAKÇI]

@Muzaffer Ali Bey,
Bende de aynı problem oluyor. Makromda Userformum açıldığında "KAYIT sayfasına gitsin diye Sheets("KAYIT").Select yazdım. Sadece çalıştığım excel açık olunca problem yok fakat başka bir excel kitabı daha açık olunca hata '9' mesajı alıyorum.

 

[Furkan TARAKÇI]

@Muzaffer Ali Bey,
Bende de aynı problem oluyor. Makromda Userformum açıldığında "KAYIT sayfasına gitsin diye Sheets("KAYIT").Select yazdım. Sadece çalıştığım excel açık olunca problem yok fakat başka bir excel kitabı daha açık olunca hata '9' mesajı alıyorum.

@Korhan Ayhan Bey yardımcı olabilir misiniz?

 

[Korhan Ayhan]

Örnek dosya paylaşınız lütfen..