Salt Okunur Açmayı Engellemek.

1 2 3 4 5 6 7 8 9 10 11 12 13
28/05/2020, 15:39

feraz

Bir modüle alttaki sub içine alın open ile aynı iş yapar.Ayrıca hata vermesinin ihtimali yoktu nasıl başardınız hata verdirmeyi Ayrıca eğer kaydetmeden kapansın derseniz close den  sonra boşluk bırakıp False yazın normalde böyle oacak sanıyorum.


Sub Auto_Open

Kodlar yazılacak

End Sub
28/05/2020, 16:43

m_demir

Hocam kod çalışıyor iki mesajı da veriyor.  Salt okunura evet dediğimiz zaman gelen mesajlarda dosya zaten var değiştirmek istiyormusunuza evet dediğimiz zaman salt okunur olarak açıyor Excel kitabını.

Hiç bir şekilde açılmasını istemiyorum. saygılar.
28/05/2020, 16:50

berduş

sorun ozaman sizin diğer kodlarınızdan kaynaklanıyor
ekleyin dosyanızı inceleyelim.
28/05/2020, 17:08

m_demir

Hocam dosyayı yükledim.
28/05/2020, 17:30

berduş

çalışmanızda Close olayına tanımlanmış kodlar var
dolayısıyla kapamaya çalışırken o kodlar devreye giriyor sorun da bundan kaynaklanıyor

deneme amaçlı olarak kapanma olaylarını devre dışı bırakıp deneyin
yada kapatmaya çalışırken çalışan procedürlerin en başına aşağıdaki kodları ekleyip deneyin
If ActiveWorkbook.ReadOnly Then exit sub
eğer fonksiyon ise exit sub yerine exit function yazmanız gerekebilir
28/05/2020, 18:16

m_demir

Evet Hocam kapanma kodlarından kaynaklanıyor. Kapatma kodlarını devre dışı bıraktığım zaman salt okunur açılmiyor.

Peki Hocam X işaretlerini devre dışı bırakıp sadece buton ile kapatmak istiyorum. ve Kitap kapandığı zaman evet hayır uyarısı çıkmadan kaydedip direk kapanmasını istiyorum. Bunun için kapatma kodlarını hangi kodlarla değiştirmem gerekiyor.
1 2 3 4 5 6 7 8 9 10 11 12 13