Speed up Loop VBA

[PcMax]

Hi,

Performed a test with the macro Sub MarkPositionNumbers3.
Always measured under the same conditions.
I get the following results: 0.125 seconds.