Soru Değer Hatası F2 ile Düzeltme

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Arkadaşlar Merhaba,

Çalıştırdığım makroda zaman zaman nedenini bilmediğim bir sorun ile karşılaşıyorum. makro bitimiden sonra, görüntüde göreceğiniz gibi "D6:E19" aralığında makro ile yazılan bir fonksiyonda hata alıyorum, her hücreye gelip F2 yaptığımda düzeliyor, Başta yazdığım gibi bu sorunu sürekli almıyorum, yapmak istediğim şu çalıştırdığım makro bittikten sonra ilave bir makro ile D6:E19 hücrelerinde tek tek F2 yapmak istiyorum. Bu konuda yardımcı olabilirseniz sevinirim. Şİmdiden Teşekkürler
 

Ekli dosyalar

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Korhan Bey
Dosya yok
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Verdiğim linke tıkladığınızda karşınıza ne geliyor?
 

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Korhan Bey,

Aşağıdaki kodu çalıştırdır, anacak resimdeki gibi ekran açıkılyor ve düzelmiyor.


Sub F2_ENTER()
[D6:D19].Select
Application.SendKeys "{F2}"
Application.SendKeys "{ENTER}"
End Sub
 

Ekli dosyalar

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
"Sendkeys" kodlarını VBA editörü açıkken çalıştırmamalısınız.

Excel sayfasına dönün ALT+F8 ile makro çalıştır ekranını açıp kodu çalıştırın. Ya da bir butona makroyu tanımlayıp kullanın.
 

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Korhan Bey Merhaba,
Söylediğiniz şeilde yaptım Ekran gelmedi anacak, DEĞER hatalarıda düzelmiyor, ben hücrelerin üzerine tek tek gelip F2 yaptığımda değer hataları gidiyor, bunun için ne yapmam gerekiyor acaba bu arada hücre içerisindeki formülün fonksiyonu aşağıdaki kodttur. bu kod çalışıyor ama zaman zaman bilemediğim bir nedenden Değer hatası veriyor, bunuda hücrelerin üzerine gelerek F2 yaparak çözüyorum. Yardımcı olabilirseniz sevinirim.




Function KolayBirlestir(Alan As Range)
Dim Deger As String
Dim Bak As Range
For Each Bak In Alan
If Deger = "" Then
Deger = Bak.Text
Else
Deger = Deger & ";" & Bak.Text
End If
Next
KolayBirlestir = Deger
End Function
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Örnek dosya paylaşma durumunuz var mı?
 

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Korhan Bey

Örnek Dosyada şu anda değer hatası yok. Bu hatayı zaman zaman veriyor.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Belki hesaplama yöntemi MANUEL (ELLE) ayarlı olabilir. Onu kontrol ediniz.
 

bulentkars

Altın Üye
Katılım
5 Ağustos 2005
Mesajlar
671
Excel Vers. ve Dili
2003 TR
Altın Üyelik Bitiş Tarihi
23-03-2027
Baktım manuel değil Otomatik. Kodun içerisine bir ilave yapılabilir mi acaba
 
Üst