Macro ile dosyaya Userform ekleme

[frakaj]

Herkese iyi çalışmalar.

Benim yapmak istediğim sayfada bulunan veya userform üzerinde bulunan bir commandbuttona bastığımda daha önce belirlediğim konumda bulunan ve daha önce export ettiğim userform veya modülü dosyaya import etsin ve çalıştırsın.

Üzerinde sürekli değişiklik yaptığım bir userform var. Her değişiklikten sonra ağda bulunan her bilgisayarda bu userformu yeniden import etmem gerekiyor ve ben bundan sıkıldım. Bu sebepten yardım bekliyorum.

Şimdiden ilgilenenlere teşekkürler.

 

[Zeki Gürsoy]

Aşağıdaki proseduru butona bağlayıp kullanabilirsiniz.

Private Sub Comp_Import()

Set comp = ThisWorkbook.VBProject.VBComponents.Import( _
    ThisWorkbook.Path & "\userform1.frm")
    
comp.Name = "Import_Edilen"

End Sub

 

[frakaj]

İlginize teşekkürler.
Hemen deniyorum.
Çok sağolun

 

[frakaj]

Verdiğiniz kodu denedim.
Çalıştırdığımda şu kodu veriyor:
"run-time error '1004'"
"VB Projesi'ne programlı olarak erişim güvenli değil"

bu hatayı set comp=.... diye devam eden satırda veriyor.

Acaba sorun nerde. Nasıl aşabilirim?

Teşekkürler

 

[Zeki Gürsoy]

Ekli dosyaları çıkarıp test edin. Bende hata oluşmadı.

 

[frakaj]

Sizin bana gönderdiğiniz dosya ile daha önce yazdıklarınızı aynen yapmama rağmen hala aynı hatayı veriyor.
sanırım işyerinde olduğumdan dolayı güvenlik sorunları olabilir.

İlginize teşekkürler.

 

[Zeki Gürsoy]

Versiyon farkı da olabilir. Office 2003 ile test ettim.

 

[frakaj]

Bende de aynı sürüm yüklü ama sanırım bilgisayarlarda yetki kısıtlaması olduğundan böyle bir sorunla karşılaşıyorum.
Yinede ilginize teşekkür ederim.