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 e buon 25 Aprile..... casalingo
Prova cosi' dovrebbe andare
Sub Main()
Dim nua(4005,14),nn(2)
ee = InputBox("DA QUALE DATA INIZIARE"," DATA ","01/01/2017")
ms = CInt(InputBox("In quale mese? ",,5))
If ms = "" Then Exit Sub
q = CInt(InputBox("Quanti ambi ed estratti vuoi visualizzare ...
o.k. joe
in questo caso non si tratta di una modifica , conosco la tua giusta contrarieta' alle modifiche .
pensavo ad una giunta un post scrittum,una funzione in calce
che prelevasse i dati tali e quali . ma tant'e' .rispetto il tuo consiglio e ti auguro buon proseguimento.
aldo