Salt Okunur Açmayı Engellemek.

Salt Okunur Açmayı Engellemek. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Salt Okunur Açmayı Engellemek. (/konu-salt-okunur-acmayi-engellemek.html)

Sayfalar: 1 2 3 4 5 6 7 8 9 10 11 12 13

RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020

Benim bilgisayarımda tam kapatıyor, arkada planda çalışmaya devam etmiyor, görev yöneticisinde arka planda çalışan Excel dosyası görünmüyor. Bu bahsettiğim kendi yukledigim dosya için geçerli sizin calismanizi inceleme fırsatım olmadı. Ama siz benim dosyam için de arka planda açık kaldığını söylediniz buna bir anlam veremedim, bende sorunsuz çalışan kod sizde neden kapatmaz programı?

RE: Salt Okunur Açmayı Engellemek. - m_demir - 29/05/2020

Evet Berduş hocamın dosyası kapanıyor. Arka planda çalışmıyor. Berduş Hocamın dosyasını kullanacağım. İkinize de çok, çok teşekkürler ellerinize sağlık.
Konuyu taşıya bilirsiniz saygılarımla.

RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020

Benim yukledigim dosya şimdiye kadar çalışıyor muydu? Sizin dosyanızla aradaki fark ne, sadece workbook_open olayının kodlarıyla kapanma kodlarına ekledigim kodlar değişmişti?

RE: Salt Okunur Açmayı Engellemek. - m_demir - 29/05/2020

Hocam aşağıdaki kapanma kodları pasif ettiğinizden kaynaklanıyor olabilir mi.

Aşağıdaki blok hataya neden oldugundan kaldırdım
'If Val(deg) = 0 Then 'Excel X kapatmayı engellemek
''MsgBox "Lütfen ÇIKIŞ Butonunu Kullanınız.", vbCritical
'Cancel = True
'End If

RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020

O kodlar sorun çıkardığı için devre dışı bırakmıştım
Ama o kodlar olmadan da X'e bastığınızda kapanmıyor, butondan kapatınız uyarısı veriyordu. Yani o kodlara gerek yoktu.

Çözülmüşlere taşıyalım mı?

RE: Salt Okunur Açmayı Engellemek. - feraz - 29/05/2020

Örnek hazırladım.Sorun kapatma olayında If Val(deg) = 0 herzaman sıfır oluyordu.

Gif ekledim.Yedek alınan C sürücüsüne txt dosyası ekletip ordaki veriye göre birşeyler yyaptım salt okunur olmadığı için deneyemedim bu şekilde.