formülleri makro ile yazmak mümkünmü

[m.gur]

Merhaba
Dosyamdaki formülleri makro ile yazmak mümkünmü. Liste uzun olduğu için formüllerin hesaplanma süresi uzuyor. Dosya yavaşlamış oluyor haliyle. Bir de ana listeyi süzüp diğer sayfaya aktarıyorum. Sıra no sütununa otomatik yaptım. Ancak bu sayfaya aktarılacak veri listesi 1 sayfadan az olduğu zaman yazıcıdan 1 den fazla sayfa çıkıyor. Bunu da makro ile önleyebilirmiyim. Teşekkürler.

 

[Qene]

Formülleri makro ile yazmak mümkün. Ama eğer formüller bilgisayarınızı kasıyorsa, makro ile yaptığınızda da makro çalışırken kasacaktır. Yani çok fazla deişen birşey olmaz.
Ama tabi her hücre değeri değiştirdiğinizde en azndan dosya işlem yapmaz.

 

[dEdE]

Merhaba,
Sorun sadece sıra numarası vermekse, buyurun.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [B:B]) Is Nothing Then Exit Sub
If Target <> "" Then Target.Offset(0, -1).Value = Target.Offset(-1, -1).Value + 1
End Sub

 

[m.gur]

Sayın dede; teşekkürler işimi gördü.

 

[dEdE]

Sayın dede; teşekkürler işimi gördü.

Rica ederim.
İşinize yaradığına sevindim.
Formüller gibi her değişiklikte tüm hücreler yeniden hesaplanmayacağı için sisteminizi zorlamayacaktır.

Hoşçakalın.