Exel çalışma kitabında "x" basıncak kaydetmeden çıkmasın

[zehnisağcan]

MERHABA üstatlar öncelikle;

daha önce forum sayesinde ekde vermiş olduğum çalışma sayfasını değerli hocalarım sayesinde yapmış idik.

şimdi benim istediğim çalışma kitabından çıkarken "x" basıldığında;

yapmışolduğunuz değişiklikler kaydedilsinmi diye sormasın direk otomatikman kaydederek çıksın.

amaç:izin yapıncak kaydetmeden çıkıyorlar yapılan izin, izin kartına işlenmiyor, bu durumun önüne geçmek.

 

[N.Ziya Hiçdurmaz]

yanıt

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub

 

[İhsan Tank]

MERHABA üstatlar öncelikle;

daha önce forum sayesinde ekde vermiş olduğum çalışma sayfasını değerli hocalarım sayesinde yapmış idik.

şimdi benim istediğim çalışma kitabından çıkarken "x" basıldığında;

yapmışolduğunuz değişiklikler kaydedilsinmi diye sormasın direk otomatikman kaydederek çıksın.

amaç:izin yapıncak kaydetmeden çıkıyorlar yapılan izin, izin kartına işlenmiyor, bu durumun önüne geçmek.

merhaba
kitabınızın kod bölümünde bulunan thisworkbook bölümüne

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.DisplayAlerts = True
End Sub

bu kodu yapıştırın.
eki inceleyiniz

 

[zehnisağcan]

öncelikle ilginiz için teşekür ederim.

hocam peki bu çalışmaya kullanıcılarda açık ken kitab işlem yapılmaz ise 5 dakka sonra kapatma macrosu koyma imknımız var mı?

 

[İhsan Tank]

öncelikle ilginiz için teşekür ederim.

eki inceledim ihsan tank hocam vermiş olduğunuz macroyu nereye ekliyorum.

kitabınızı açın Alt+f11 açın orayada çıkan thisworkbook'a yapıştırın
yada eki inceyin

 

[zehnisağcan]

teşekür ederim. hallettim.

hocam peki bu çalışmaya kullanıcılarda açık ken kitab işlem yapılmaz ise 5 dakka sonra kapatma macrosu koyma imknımız var mı?

 

[zehnisağcan]

çünkü kullanıcı da açık kalırsa ben açamıyorum salt okunur açmam gerekecek

 

[zehnisağcan]

ihsan hocam gittin galiba

daha önce alta konuda olanlar gözüküyordu iyiydi

 

[cmzrfdl]

salt okunur olarak açmamak için farklı bir çözüm: gözden geçir sekmesinden çalışma kitabını paylaştır seçilerek dosya paylaşıma açılabilir. böylece birden fazla kullanıcı dosya üzerinde değişiklik yapabilir. bu arada verdiğim çözüm excel 2003'te var mı bilmiyorum. 2007'de var.

 

[zehnisağcan]

üstat ben onu denedim ama sorunla karşılaştığım için kaldırdım,

benim de amacım işde 5 dakka sonra çalışma kitabını kapttırma imkanı var mı diye hocama sordum ama geri dönüş yapma dı başka konu ile ilgileniyor sanırım

sayfa korumalı olduğundan o imkanı kullanamıyorum.

 

[zehnisağcan]

Sub auto_open()
Application.OnTime Now + TimeValue("00:00:10"), "security"
End Sub

bu macroyu buldum forum da ama sayfa açılışından 10 saniye sonra kapatıyor

konuyuda yazan arkadaş da belirtmiş zaten o da benim istediğimin aynısını istemiş ama sonuç yok

işlem yapılmaz ise süre başlasın

 

[İhsan Tank]

üstat ben onu denedim ama sorunla karşılaştığım için kaldırdım,

benim de amacım işde 5 dakka sonra çalışma kitabını kapttırma imkanı var mı diye hocama sordum ama geri dönüş yapma dı başka konu ile ilgileniyor sanırım

sayfa korumalı olduğundan o imkanı kullanamıyorum.

merhaba
eki inceleyiniz.
5. dkk sonra otomatik kaydedip kapanıyor

 

[zehnisağcan]

hımm teşekür ederim hocam

hocam işlem yapılmaz ise gibi bir seçeneğimiz olamaz mı peki

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

 

[zehnisağcan]

evet bu kadar
bu çalışmaya emeği geçen değerli üstatlarıma teşekür ederim.

 

[İhsan Tank]

evet bu kadar
bu çalışmaya emeği geçen değerli ........ teşekür ederim.

Not : noktalı olan yer kendimi oraya layık görmediğim için tarafımdan kaldırıldı.

rica ederim
kolay gelsin :mutlu:

 

[zehnisağcan]

konu kapatıldı