auto open dosyasına bağlama

[aydogankemal]

Merhabalar aşağıdaki komut dizinini auto open dosyasına bağlamam gerekiyor(muş) fakat bunu nasıl yapacağımı bilmiyorum yardım edermisiniz


Sub Düğme1_Tıklat()
If [a1] = 15 Then
MsgBox "Kullanım süreniz bitti"
ActiveWorkbook.Close
Else
[a1] = [a1] + 1
ActiveWorkbook.Save
End If
End Sub

 

[Skorpiyon]

Sayın aydogankemal,

Boş bir excel kitabı açın. Alt+F11 tuşlarına basın. Yukarıdaki menü'den
Insert-Module deyin. ve aşağıdaki kodları açılan yere yapıştırın.
Kolay gelsin.

Saygılarımla.

Sub auto_open()
If [a1] = 3 Then
MsgBox "Kullanım süreniz bitti"
ActiveWorkbook.Close
Else
[a1] = [a1] + 1
ActiveWorkbook.Save
End If
End Sub

Not : Kitabı 4 kez açmaya çalıştığınızda uyarı verecektir.

 

[isarican]

Sayın aydogankemal,

Boş bir excel kitabı açın. Alt+F11 tuşlarına basın. Yukarıdaki menü'den
Insert-Module deyin. ve aşağıdaki kodları açılan yere yapıştırın.
Kolay gelsin.

Saygılarımla.

Sub auto_open()
If [a1] = 3 Then
MsgBox "Kullanım süreniz bitti"
ActiveWorkbook.Close
Else
[a1] = [a1] + 1
ActiveWorkbook.Save
End If
End Sub

Not : Kitabı 4 kez açmaya çalıştığınızda uyarı verecektir.

Arkadaşım tamam iyi hoşta mesala bir kisi makroları güvenligini en yükseğe ayarlar ise istediği kadar kullanabilir. excel dosyasını ancak makroları sadece kullanamaz.

Makroyu da kullanmak isterse vba ya girer ilgili module yi siler sınırsız makrolu kullanabilir excel dosyasını eğer vba sifreli isede bununda kolayı var kırar.

Bence excelde konulan sınırlamayı'(demo uygulamas&#305 nı kırmak çok kolay


Haksız mıyım? Yanlışmıyım? Yanlışmı düşünüyorum..

 

[Skorpiyon]

Sayın isarican,

Merhabalar aşağıdaki komut dizinini auto open dosyasına bağlamam gerekiyor(mu&#351 fakat bunu nasıl yapacağımı bilmiyorum yardım edermisiniz


SORUYA DİKKAT EDİNİZ.

Sadece ilgili komutları Autpen'a bağlamak istemiş.

Bizde cevabını verdik.

Saygılarımla...