Formül çalışmıyor

[alfa&omega]

Merhaba,

düşeyara formulü ile diğer tabloldan verileri getirmeye çalışıyorum. formül doğru yalnız sıkıntı ilgili formül hücresinin içine girip enter yaptıktan sonra veriyi getiriyor. Otomatik olarak veri gelmiyor. Bunu her seferinde teker teker yapmak çok zaman kaybına neden oluyor.

teşekkürler

 

[çıtır]

Dosyanızın kısa bir örneğini paylaşırsanız neden anlaşılabilir ve çözüm bulan arkadaşlar olur.Anlatımla soruna çözüm bulunaçağını sanmam.

 

[Muzaffer Ali]

Hesaplamaları manuel yapacak şekilde seçeneklerden ayarlamış olmalısınız.

Düzeltmek için
Excel VBA yı aç (CTRL+F11)
Yeni bir modüle ekle (Insert / Module)
Aşağıdaki kodu açılan sayfaya kopyala F5 tuşuna bas.
Artık hesaplamalar otomatik yapılacaktır.

 

[alfa&omega]

Dosyanızın kısa bir örneğini paylaşırsanız neden anlaşılabilir ve çözüm bulan arkadaşlar olur.Anlatımla soruna çözüm bulunaçağını sanmam.[/QUOT

 

[alfa&omega]

Hesaplamaları manuel yapacak şekilde seçeneklerden ayarlamış olmalısınız.

Düzeltmek için
Excel VBA yı aç (CTRL+F11)
Yeni bir modüle ekle (Insert / Module)
Aşağıdaki kodu açılan sayfaya kopyala F5 tuşuna bas.
Artık hesaplamalar otomatik yapılacaktır.

aşağıdaki kodu bulamadım

 

[çıtır]

Sayın alfa&omega
Formülde ve dosyada bir sıkıntı yok ben açtığımda doğrudan getirdi.Yinede siz Formüller sekmesinde Hesaplama seçeneklerine bakınız.Otomatik işaretli olmalı.Sizinkinde el ile işaretli olabilir.Kolay gelsin.

 

[alfa&omega]

1. Dosya sekmesini tıklatın, Seçenekler'i ve sonra da Formüller kategorisini tıklatın.
   Excel 2007’de önce Microsoft Office Düğmesi'ne
   
   , ardından da Excel Seçenekleri'ne ve Formüllerkategorisine tıklayın
2. Aşağıdakilerden birini yapın:
   • Değer, formül veya adda her değişiklik yapışınızda bağımlı tüm formülleri yeniden hesaplamak için Hesaplama seçenekleri bölümünde, Çalışma Kitabını Hesapla öğesinin altında Otomatik seçeneğini tıklatın. Bu, varsayılan hesaplama ayarıdır.

teşekkürler hallettim.

 

[Muzaffer Ali]

Kod şu:

Sub HesaplamalarıOtomatikYap()
Application.Calculation = xlCalculationAutomatic
End Sub

Sayın alfa&omega'nın söylediklerini kod ile yapar.