Ciao, chiedo cortesemente agli esperti di inserire nello script la possibilità di selezionare la ruota con apposita finestra.
Grazie
Option Explicit
Sub Main
Dim Ini,Fin,Es,R,S,P,Q,D,Dst(45),mx
S = Space(1)
Ini = EstrazioneFin - 28
Fin = EstrazioneFin - 10
For Es = Ini To Fin...