Stai usando un browser molto obsoleto. Puoi incorrere in problemi di visualizzazione di questo e altri siti oltre che in problemi di sicurezza. . Dovresti aggiornarlo oppure usare usarne uno alternativo, moderno e sicuro.
Ciao Giulio ma questo script è tuo sulla prima pagina.
Sub Main()
Dim rt(2),rt1(2),pt(4),n1(7)
pt(1) = 1
pt(2) = 2
pt(3) = 0.5
pt(4) = 0.5
clp = 13
rt(1) = 5
rt(2) = 6
rt1(1) = 11
rt1(2) = 12
ini = 10541
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio(es)
If IndiceMensile(es) =...