Rubrica Excel

[matematicoestinto]

Ciao a tutti

Per prendere confidenza con excel e visual basic ho provato a fare uan semplice rubrica telefonica con tre colonne: nome, cognome e numero telefonico. La cella C3 contiene "nome" la cella D3 contiene cognome e la cella E3 contiene "numero"

Ho creato un pulsante per inserire i dati e vi ho inserito il codice seguente

Private Sub AGGIUNGIBTN_Click()
Dim nome, cognome, numero As String
Dim x As Integer
x = 3

'individua riga vuota
Do
If Cells(x, 3).Formula = "" Then Exit Do
x = x + 1
Loop
titolo = InputBox("NOME")
numero = InputBox("COGNOME")
numero = InputBox("NUMERO CELL")
Cells(x, 5).Formula = numero
Cells(x, 3).Formula = nome
Cells(x, 4).Formula = cognome
End Sub


Potete dirmi che errore ho fatto dato che immette i dati nel modo scorretto?
Provate se da voi funziona, per favore.

GRAZIE

[eugenio.amitrano]

Ciao, forse hai sbagliato l'assegnazione delle InputBox.

hai scritto:
titolo = InputBox("NOME")
numero = InputBox("COGNOME")
numero = InputBox("NUMERO CELL")

forse e':
nome = InputBox("NOME")
cognome = InputBox("COGNOME")
numero = InputBox("NUMERO CELL")

Eugenio

[matematicoestinto]

Grazie... Che errore grossolano!