UserForm'u Başka bir Excel Dosyasına Makro ile nasıl kopyalayabilirim?

[adnankizil]

Arkadaslar,

makromuzu calistirdigimiz dosyamizda,
hazirlamis oldugum bazi UserForm ve Modul'leri yeni olusturdugum veya mevcut Excel dosyalarina nasil kopyalayabilirim?

Modul'leri kopyalamada sorun yok, onu bi sekilde bulup hallettim,

ActiveWorkbook.VBProject.VBComponents.Item("Module1").Export "test.txt"

gibi export edip sonra istedigim dosyaya import ediyorum.

Ama Form'lari nasil yapicam isin icinden cikamadim, kaynakta bulamadim.

Bilen varsa, yardimci olabilirse memnun olurum.

Saygilar

 

[Levent Menteşoğlu]

Userformlarıda VB editöründe üzerine sağ-klik yapıp export özelliği ile frm olarak kaydettikten sonra diğer dosyanıza tekrar import özelliği ile yükleyebilirsiniz.

veya daha pratik olarak her iki dosyayıda aynı excel programı içinde açın ve VB editöründe userformu fare ile tutarak diğer dosyanın adı üzerine sürükleyerek bırakın.

 

[hsayar]

Kopyalayacağınız Userformun olduğu Çalışma kitabını ve kopyalanacak çalışma kitabını aynı anda açın
vbe moduna geçin userformu kopyalanacak çalışma kitabının + sının yanına sürükleyin... moduüller içinde geçerlidir.

 

[adnankizil]

o sekilde degil ama!

Arkadaslar,

öncelikle yanıtlarınız için tesekkür ederim.

ben manuel olarak kopyalama yapabiliyorum.

Benim istedigim, bunun otomatik olarak, çalistirdigimiz makro tarafindan yapılmasi.

 

[Levent Menteşoğlu]

Aynı mantığı kullanabilirsiniz.

ActiveWorkbook.VBProject.VBComponents.Item("UserForm1").Export "userform1.frm"

 

[Zeki Gürsoy]

Aynı şekilde Import için;

Workbooks("XXX.xls").VBProject.VBComponents.Import "c:\userform1.frm"

 

[adnankizil]

Evet,

aslinda sorunun içinde cevapta varmis.

Ama ilk denemelerde basarisiz olunca acaba demistim kendi kendime. Sonra tekrar denedim, en basitinden, o zaman oldu.

ilginiz icin tesekkür ederim.


ActiveWorkbook.VBProject.VBComponents("UserForm1").Export TamponDosya
Windows(YeniDosyaIsmi).Activate
ActiveWorkbook.VBProject.VBComponents.Import TamponDosya