Simple Macro, Slow Calculation. Help speed up please

[jlieu]

I have a very simple command button that adds 1 to a cell like a tally.

Dim whiteBloodCell As Integer
whiteBloodCell = Range("E10").Value + 1
Range("E10").Select
ActiveCell.FormulaR1C1 = whiteBloodCell

The problem I have is that lets say I see 2 white blood cells. I want to double click the command button, but it only lets me click the command button at about one click per second. I was wondering if anyone knew a way so that there is no lag in computation. Running a dual core i5 with 8 gb of ram if that helps. Thank you everyone in advance!

 

[My Aswer Is This]

This is your entire script??

 

[Michael M]

Is that all of the code under the command button ??
You don't need to keep using Select to work with a cell !

Range("E10").Value=Range("E10").value +1

 

[jlieu]

Yep, that's everything. I'm pretty stumped why excel would limit me to such few clicks per second.

 

[jlieu]

Oh, that looks way better than mine. Much more compact. I tried switching it out for my code. It still takes a minimum of 1 second before I can click again.

 

[My Aswer Is This]

Try this:

Range("E10") = Range("E10") + 1

 

[My Aswer Is This]

Mine advances as fast as I can click the mouse

 

[jlieu]

I feel like it does help not selecting the cell. Still a little wonky with double clicks, but doing 3+ helps a lot. That's good enough for me, thank you very much!!

 

[Michael M]

If that is all the code for that action, I'm wondering if you have some recalculation events going on ??
As My aswer is this stated, this should work as fast as you can click the mouse !!
So, is there a whole heap of other cells affected by this mouse click ??
If so, maybe you need to do a Manual calculation until all code is completed !