Raga aiuto....questo piccolo programma dovrebbe aprirmi in sequenza 5 inputbox in cui scrivere 5 nominativi...alla fine vorrei avere un file excel con i 5 nominativi inseriti....
perchè invece all'avvio dell'applicazione mi dice
("errore di compilazione" " tipo non corrispondente"?)
il tutto riferito a "Print #1, Nominativo;"
Dove sbaglio?????aiuto.....
ECCO IL CODICE
Private Sub Tentativo()
Dim Contatore As Integer
Dim Numero_file As Integer
Dim Casella_messaggi As String
Dim Nominativo(1 To 5) As String
Open "c:\windows\desktop\Testo salvataggio.xls" For Output As #1
Casella_messaggi = MsgBox("Attenzione,il file di salvataggio è stato aperto")
For Contatore = 1 To 5
Nominativo(Contatore) = InputBox("Inserire nominativo")
Next Contatore
Print #1, Nominativo;
Close #1
End Sub
![]()
![]()
![]()
![]()
![]()
![]()
![]()