excel kasıldı

[hoguz2]

Arkadaslar cok buyuk formulum olmasada excelde kullandigim bazi formuller makronun calismasina mani oluyor.

makro excell hucrelerine kayit yaparken formullerin calismamasini, excellin hesap yapmamasini saglayabilir miyim. Förmülleri el ile hesapla yöntemini denedim olmuyor. makro calismaya basladiginda bir taraftan da formul hesaplama basliyor sonra ikisi cakisip excell kasiliyor...

bir bilgisi olan varsa paylasirsa cok sevinecegim. tesekkurler...

 

[zafer]

Merhaba


Kodlarınızı ekleyebilirmisiniz.

 

[emrexcel123]

eğer

arkadaşım benim başıma çok gelen birşey bu ben sürekli olarak formül ve makroları içiçe kullanırım fakat şöyle bir çözüm öneririm bende çok yarar sağladı
basit bir örnek
bir userformum olsun
bir kaydet butonum ve 3 tane de textbox'ım olsun
kaydet butonuna bastığımda textbox'taki veriler sırayla a1-b1-c1 hücrelerine aktarılsın >>
ben de formüle şunu yazarım
+eğer(ve(a1<>"";b1<>"";c1<>"");eğerdoğruysa;eğeryanlışsa) böylece tüm hücreler dolduktan sonra işleme başlanması gibi...
ben sorunumu böyle çözüyorum açıkçası :mrgreen: ii çalışmalar...

 

[cenk77ist]

özellikle vlookup düşeyara lı formüller çoksa sheette yapıyor benim şöyle yapıyorum bu formüllerin sadece 1 kopyasını tutuyorum macroyu çalıştırmadan önce diğer satrıları siliyorum macronun işi bitince formülleri kopyalıyıp çoğaltıyorum.. çok basit ama süper etkili

 

[hoguz2]

Sevgili cenk77ist,

Açıkcası senin önerin biraz gözümü korkuttu . Bu işlemi sürekli yenilemem hata yapma olasılığımı çok artırır. Fakat güzel tespit etmişsin aynen dediğin gibi düşeyara formülünden dolayı kasılıyor.



emrexcel123, Senin onerini deneyecegim umarim basarili olur. Fakat bahsettigin formulu
=TOPLA.ÇARPIM(--(Sayfa4!$A$2:$A$5000="RENKA");--(Sayfa4!$C$2:$C$5000=J2);--(Sayfa4!$B$2:$B$5000<=Sayfa1!$K$1)*(Sayfa4!$D$2:$D$5000))

ve

=EĞER(EHATALIYSA(DÜŞEYARA(A13;Sayfa3!$A$2:$B$300;2;0));"";((DÜŞEYARA(A13;Sayfa3!$A$2:$B$300;2;0))))

bu iki formule eklemem gerekecek yardimci olursan sevinirim.


3. Bir secenek olarak:

Formulleri makro ile yazdirsam ayni sekilde kasilir mi sizce.

For next li bir dongu ile makro işlem yapmadan once formulleri gerekli yerlere yazsa sonra cikan sonuclari kopyalayip deger olarak yapistirsa yani formulleri tekrar silmis olsa. Sizce yine kasılır mı .

Yani makro formulleri hucrelere yazarken bir taraftanda hesaplama işlemi başlar da aynı tas aynı hamam olur mu ?

 

[emrexcel123]

örnek

arkadaşım bir örnek eklersen yardımcı olmaya çalışırız...

 

[zafer]

Merhaba


Topla &#231;arp&#305;m&#305; makroda bu &#351;ekilde

Sub TOPLACARP1()
satır = Sheets("sayfa1").Cells(65536, 5).End(xlUp).Row
For A = 3 To satır
renka = Sheets("sayfa1").Cells(A, 5).Value
deger = Sheets("sayfa1").Range("j2")
deger1 = Sheets("sayfa1").Range("k1")
Sheets("sayfa1").Cells(A, 6) = Evaluate("SUMPRODUCT((sayfa4!b3:b55000=""" & renka & """)*(sayfa4!b3:b55000=""" & deger1 & """)*(sayfa4!b3:b55000=<" & deger1 & ")*(sayfa4!d2:d55000))")
Next
End Sub

D&#252;&#351;eyara'y&#305; bu &#351;ekilde kullanabilirsiniz.

Sheets("sayfa1").Cells(A, 6)=Application.WorksheetFunction.VLookup(ARANAN, Range("A2:E100"), kolonno, 0)

Kodlarda h&#252;crelere form&#252;l&#252;n sonucu olan de&#287;er gelir.

Dosyan&#305;z&#305;n &#351;eklini bilemiyorum.&#246;rnekleri kendinize uyarlay&#305;n.

 

[hoguz2]

verdiginiz fikirler ve taslaklar icin cok tesekkur ederim suan sistemi kurdum. makro once formulleri siliyor. verileri giriyor sonra formulleri kopyaliyor. ve tikir tikir calisiyor. yardimlariniz icin hepinize tesekkur ederim..