enter yaptıkça sayfayı kaydetsin.

[KONYA42]

Mehaba,çalışma kitabımın "sayfa 1" sayfasında enter tuşuna bastığım zaman çalışma kitabını kaydetsin.Yani her hücrede bişeyler yazıyorum.bi alt satıra enter tuşu ile atlatıkça çalışma kitabını kayıt yapsın.vereceğiniz cevaplar için şimdiden teşekür ederim.

 

[hamitcan]

ThisWorkBook kısmına,

Private Sub Workbook_Activate()
    Application.OnKey "{ENTER}", "calis"
    Application.OnKey "~", "calis"
End Sub
Private Sub Workbook_DEActivate()
    Application.OnKey "{ENTER}", ""
    Application.OnKey "~", ""
End Sub

Module1 içine,

Sub calis()
    ActiveWorkbook.Save
End Sub

ekleyin.

 

[KONYA42]

hocam,enter yapınca aynı zamanda alt satıra geçmek isityorum.Ama artık alt satıra geçmiyor.Sadece kayıt yapıyor.

 

[Korhan Ayhan]

Selamlar,

"calis" isimli makroyu aşağıdaki şekilde değiştirip denermisiniz.

Sub calis()
    Activecell.Offset(1,0).Select
    ActiveWorkbook.Save
End Sub

 

[baydeniro]

Merhaba dediğiniz gib denedim, ancak kayıt olmadı.

 

[KONYA42]

yo kayıt oluyor.Çok teşekür ediyorum.Sorunum halloldu.

 

[baydeniro]

evet kayıt oluyor. Sorunu anladım. Dosyayı kapatıp açmak gerekiyormuş. Teşekkürler.

 

[izcik]

Module 1 neresi oluyor. Dosya haline getirir misiniz?

 

[Korhan Ayhan]

Selamlar,

Sn. izcik,

Aşağıdaki linkten birçok konuyu öğrenebilirsiniz.

Uygulamalı Excel Eğitimi

 

[izcik]

Değerli Korhan Ayhan teşekkür ederim. Ama oradan ben nasıl bulayım. Bu saatler sürer

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki linki incelermisiniz.

Modül Ekleme (Resimli Anlatım)

 

[izcik]

Değerli Korhan Ayhan saatler süren deneme yanılmadan sonra en nihayet oldu Yalnız bir şey var enter yapınca, alışkın olduğumuz gibi bir alt satıra geçse ve öyle kaydetse dahai iyi olur. Bu mümkün mü kodu değiştirerek?

 

[Korhan Ayhan]

Selamlar,

Sn. izcik,

#4 nolu mesajımdaki kodu denediniz mi?

 

[izcik]

Sabahtan beri kafamız iyice durdu halbuki bu sayfayı belki 15 kere okudum ve kodları bir o kadar yapıştırıp durdum..

Çok teşekkürler değerli Korhan Ayhan..

 

[izcik]

Çorbada tuzumuz olsun:

entere basınca bir alt satıra geçen dosya,

entere basınca bir alt satıra geçmeden kaydeden dosya

ikisi bir arada
..

Her zaman kullanılabilir

 

[baydeniro]

Sayın izcik, üstatların bu tarz konular ile zamanını almayalım. Ben yardımcı olmaya çalışayım. Saatler sürmez, çok ta basit :

1) Excel sayfası içinde iken ALt + F11
2) Insert
3) Module (modül1 hazır)
4) Sağ taraftaki geniş beyaz alana ilgili kodu yapıştırın.
işlem tamamdır

 

[izcik]

Değerli serdarokan yaptım ve upload ettim bile

Yine de teşekkürler.