run time error 91 hatası alıyorum

[xkrca]

Merhaba arkadaşlar, ekte bazı nedenlerden dolayı basit bir kontrol uygulaması yapmaya çalıştım. Amacım hazırladığım, geliştirdiğim excel dökümanlarının benden habersiz kopyalanması durumunda açılmasın istiyorum burada anlatmaya çalıştığım iş ortamımdan kaynaklı nedendir, yoksa exceli ne kadar korumaya çalışsakta uğraşan birisi bunu aşabiliyor.
Eklediğim kontrol dökümanında form2 de cpu numarasının bir kısmını alarak bunu kilit kodu, bu kodun asci karşılığınıda anahtar kodu olarak bir uygulama hazırladım form2 açıldığında kendi içinde bu anahtar kodunu üretip, sayfa1in a3 sütununda ki anahtar koduyla aynı olup olmadığını denetliyor ve yanlışsa form1 e gönderip anahtar kodu girmesini istiyor, form1e yönlenip form 1i kapattığımda başlıkta da belirttiğim hatayı alıyorum, mutlaka bir yerde eksiklik var ama bir türlü bulamıyorum, hatayı bulmam ve çözmem konusunda yardımlarınıza ihtiyacım var.
Teşekkürler.
http://dosya.co/gosemzo7fh81/lisans_kontrol.rar.html

 

[turist]

UserForm1 kodlarında yer alan
Private Sub UserForm_Initialize()
başlığının altına bir satır olarak;
On Error Resume Next

ekleyerek deneyin.

 

[Orion1]

Makroları devre dışı bırakan biri,kolaylıkla dosyanızı açabilir.

 

[xkrca]

Makroları devre dışı bırakan biri,kolaylıkla dosyanızı açabilir.

Aradığım cevap bu değildi, forma kodları açık yüklemek gerekiyor ki yardımcı olacak insanlar açıp bakıp sorunu çözebilsin diye, buraya kilitli dosya yüklememin anlamı yok değil mi sayın Orion.

 

[xkrca]

UserForm1 kodlarında yer alan
Private Sub UserForm_Initialize()
başlığının altına bir satır olarak;
On Error Resume Next

ekleyerek deneyin.

Sayın turist on error resume next diyerek hatayı görmezden gelmek istemedim, biraz daha sorunsuz olsun istiyorum.

 

[turist]

Sayın turist on error resume next diyerek hatayı görmezden gelmek istemedim, biraz daha sorunsuz olsun istiyorum.

UserForm2 de
Private Sub UserForm_Initialize()
başlığının altındaki Onload Me yerine
Me.Hide
yazarak deneyin.
İstediğinize cevap değilse; aşağıdaki makaleleri inceleyin.

https://support.microsoft.com/tr-tr...variable-or-with-block-variable-not-set-follo

https://docs.microsoft.com/en-us/of...tFrameworkMoniker-Office.Version=v15)&rd=true

 

[xkrca]

UserForm2 de
Private Sub UserForm_Initialize()
başlığının altındaki Onload Me yerine
Me.Hide
yazarak deneyin.
İstediğinize cevap değilse; aşağıdaki makaleleri inceleyin.

https://support.microsoft.com/tr-tr...variable-or-with-block-variable-not-set-follo

https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/object-variable-not-set-error-91?f1url=https://msdn.microsoft.com/query/dev11.query?appId=Dev11IDEF1&l=en-US&k=k(vblr6.chm1000091);k(TargetFrameworkMoniker-Office.Version=v15)&rd=true

Sayın turist çok teşekkürler, hata vermedi ancak ben hala anlamış değilim neden böyle bir hata alıyordum?