enter tuşu kullanılmıyor

akd

Destek Ekibi
Destek Ekibi
Katılım
14 Ağustos 2004
Mesajlar
1,105
Excel Vers. ve Dili
2003
Merhaba arkadaşlar,
aşagıdaki kodları denerken enter tuşu devre dışı oldu
enter tuşlarrrını kullanamıyorum,
enter tuşlarını nasıl çalışır hale getirebilirim.
Selamlar...
Private Sub Worksheet_Activate()
Application.OnKey "{ENTER}", "Macro1"
Application.OnKey "~", "Macro1"
End Sub
 
X

xxrt

Misafir
Modüle ;
Kod:
Sub Auto_Close()
Application.MoveAfterReturn = True
End Sub
Yazın Run deyin..Böylece bu belayı birdaha denemeyin.. :hihoho: Tuş fonksiyonlarının özelliklerini atadığınızda,onların iptalini çıkarken yapmak gerek..
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,268
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
@akd:

Yukarıda xxrt'in dediği gibi VBA ile tuşlara atama yaptıktan sonra dosyayı kapatırken veya işiniz bittiğiniz anda, atanan görevleri iptal ederek tuşlara kendi asli görevlerini iade etmelisiniz.

Aksi takdirde durum düzelene kadar, siz o dosyayı kapatıp başka bir dosya açsanız bile Excel sözkonusu tuşlara atanan yeni görevleri yerine getirmeye çalışacaktır.

Çünkü, atamalar kodlarda kullanılan OnKey metodu vasıtasıyla Application nesnesine yani Excel'in kendisine yapılmaktadır.

Bu durumu düzeltmek için aşağıdaki kodu çalıştırın.

Kod:
Sub ResetEnterReturn()
    Application.OnKey "{ENTER}"
    Application.OnKey "~"
End Sub
 

akd

Destek Ekibi
Destek Ekibi
Katılım
14 Ağustos 2004
Mesajlar
1,105
Excel Vers. ve Dili
2003
Çok çok teşekkür ederim sayın arkadaşlarımmmmm
:D
 
Üst