EXCEL TextBox come fare???

[Buz1980]

Ciao ragazzi,

vi spiego il mio probblema!
all'apertura di una UserForm vorrei che il programma nella casella TextBox mi scrivesse in automatico un numero che si trova per esempio nell foglio1 in B7 e mi desse la possibilita di modificarlo!

E' Possibile fare un lavoro di questo tipo?
Ciao
attendo vostre ntizie in merito!!!

[ixa]

.... prova queste istruzioni, dovrebbero fare al caso tuo!

Codice: Seleziona tutto

Private Sub UserForm_Activate()
Range("A1").Select
TextBox1 = ActiveCell.Offset(6, 1).Value
End Sub


Codice: Seleziona tutto

Private Sub TextBox1_Change()
ActiveCell.Offset(6, 1).Value = TextBox1
End Sub


ciao!

[Buz1980]

E se io avessi i dati nel foglio nominato "Conti"?
Cosa devo aggiungere?

[Buz1980]

ho visto che con quel procediment mi salva tutto in formato testo!
se volessi salvarlo in formato numer come psso fare?

ciao e grazie 1000 per l'aiuto!

[Anthony47]

Ciao Buz.
Non sono ne' fanatico ne' particolarmente esperto sulle userform, ma il seguente codice dovrebbe funzionare (le modifiche rispetto a quello precedente sono ovvie...):

Codice: Seleziona tutto

Private Sub UserForm_Activate()
'Sheets("Conti").Activate          '<<<<<< Abilitare???
TextBox1 = Sheets("Conti").Range("B7").Value
End Sub

Private Sub TextBox1_Change()
Sheets("Conti").Range("B7").Value = TextBox1.Value
End Sub

Se vuoi attivare il foglio Conti all' apertura della form, devi scommentare l' istruzione marcata "<<<<<" (togli il primo apostrofo), altrimenti lavori ma senza vedere l' effetto.

Ciao.