• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

formüllerden dolayı userform işlemlerim çok ağırlaştı

Katılım
28 Ocak 2008
Mesajlar
260
Excel Vers. ve Dili
2003
5 sayfadan oluşan verilerim var bunların 3'ünde formüllerle dolu satırlar ve vlookup ile countif, if formülleri ağırlıkta bu sebeple userformumda kaydet yada değiştir butonlarına bastığımda nerdeyse kök salıyorum.. :)

Tek alternatif olarak Ferhat beyin önerdiği excelin formülleri oamatik değil de manuel hesaplamasını (F9) sağlıyarak çözüme ulaşıyorum bu seferde userformda bunları güncellemediği için sağlıklı bir sonuç alamıyorum..

Aklıma acaba diyorum userformda ilgili sheetten bilgi alınması yada aktarılması gerektiğinde bir kod varmıdır ki bu formülleri otomatik çalıştırsın işlem bititiğindede tekrar manuel yapsın saçma gelior ama

teşekkürler
 
tabiki vardır ama
bunları yapmak için
1. vba öğrenmek için siteyi dolaşmak
2.dosyayı ekleyip yardımcı olunması için biraz sabır...
 
tabiki vardır ama
bunları yapmak için
1. vba öğrenmek için siteyi dolaşmak
2.dosyayı ekleyip yardımcı olunması için biraz sabır...

Vba konusundaki sabır ve öğrenmek için çaba sarfediyorum, dosyayı eklemek yerine bunun yolu ne olabilir formüller yerine vba ile mi halledilmesi yoksa bahsettiğim gibi manuel yada otomatik çalıştırma gibi bir yol var mı ?
 
konuyu tam açarsanız yardımcı olunur
yüzeysel anlattığınızdan pek bir şey söliyemiyorum

ama en basit bişey söliyim tam olarak sorununuzu bilmiyorum ama

işlem yapmadan makro kaydet diyerek
bunu bir butona atıyabilirsiniz
 
Selamlar,

Bu durumu düzeltmek için kodlarınızın başlangıcına Application.Calculation = xlCalculationManual kodunu yazın. Tekrar eski haline almak içinse kodlarınızın en son satırı olan End Sub satırından önce Application.Calculation = xlCalculationAutomatic yazınız.
 
Selamlar,

Bu durumu düzeltmek için kodlarınızın başlangıcına Application.Calculation = xlCalculationManual kodunu yazın. Tekrar eski haline almak içinse kodlarınızın en son satırı olan End Sub satırından önce Application.Calculation = xlCalculationAutomatic yazınız.

Teşekkürler korhan hocam............
 
Geri
Üst