+- 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)
RE: Salt Okunur Açmayı Engellemek. - m_demir - 29/05/2020
(28/05/2020, 22:33)feraz yazdı: Uyarı medajlarının arasına sadece clıse yada save kodları eklenecek.Hocam save kodu Berduş Hocamın Koduna aşağıdaki şekilde ekledim yine Maus imleci UserForm dışında sürekli meşgul durumda duruyor.
Private Sub Workbook_Open()
If ActiveWorkbook.ReadOnly Then
MsgBox "Bu dosya zaten kullanımda. Sonra tekrar deneyin."
'Workbooks.Count açık Excel dosyasının sayısını verir eğer 1 tane ise programı daha fazla ise sadece kitabı kapatır
If Workbooks.Count = 1 Then Application.Quit Else ActiveWorkbook.Close
ActiveWorkbook.Save
End If
End Sub RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020
1 - Anlamadığım şey neden salt okunur açılmış bir Excel dosyasını kaydetmek istiyorsunuz?
2 - önce kapatıp sonra kaydetmeye calisiyorsunuz, o nedenle hatalı olabilir
@feraz beyin belirttiği gibi kodu
Workbook.Close trueAma bence
Workbook.Close False(29/05/2020, 00:32)m_demir yazdı: Maus imleci UserForm dışında sürekli meşgul durumda duruyor.bu sorun ne zamandan beridir var? Önerdiğimiz kapatma kodlarını yazdıktan sonra mi başladı, yoksa eskiden de var mıydı?
Re: Salt Okunur Açmayı Engellemek. - m_demir - 29/05/2020
Hocam kodları sizin dediğiniz şekilde ekledim hara verdi acaba yanlış mı ekledim bakabilirmisiniz.
RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020
dün eklemiş olduğunuz son dosyayı incelediğimde bahsettiğiniz mouse sorununa rastlamadım
çalışmanızda rastladığım tek sorun Workbook_BeforeClose olayında kullanmış olduğunuz
If Val(deg) = 0 Then 'Excel X kapatmayı engellemek
'MsgBox "Lütfen ÇIKIŞ Butonunu Kullanınız.", vbCritical
Cancel = True
End Ifaşağıdaki örnek dün eklemiş olduğunuz çalış üzerinde yapılmıştır
RE: Salt Okunur Açmayı Engellemek. - m_demir - 29/05/2020
Hocam X dan kapanma kodlarını engellemeyi kaldıracam.
Hocam kapanmıyor gizleniyor. Salt okunur olarak açmak istediğimiz zaman tamamları tıkladıktan sonda kapanıyor gibi görünüyor ama görev yöneticisinde kalıyor. Arka planda açık kalıyor. İkinci defa salt okunur olarak açmak istediğimiz zaman dosya zaten açık uyarısını veriyor ve dosyayı açıyor.
RE: Salt Okunur Açmayı Engellemek. - berduş - 29/05/2020
Ben kaç defa denedim yukledigim dosyayı sorun çıkarmadı, yukledigim dosyada hangi adımları izlediniz tek tek yazar mısınız, Uygun bir zamanda deneyeyim.