Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Textbox
- Hai un problema con Excel?
Textbox
di Pietro78 (utente non iscritto) data: 03/05/2016 17:03:18
Ciao a tutti, sono nuovo del forum. Avrei bisogno di sapere come fare una cosa. Ho una textbox all'interno di una userform che mi consente di scrivere in una cella vuota del foglio excel sottostante attraverso il codice:
Private Sub Textbox1_Change()
Sheets("Foglio2").Select
Cells(16, 2).Value = Val(TextBox1)
End Sub
e fin qui tutto ok, ma se invece io volessi che il valore che inserisco all'interno della textbox1 andasse a riempire la prima riga non vuota della stessa colonna 2?
Come dovrei modificare il codice?
Grazie in anticipo!
Private Sub Textbox1_Change() Sheets("Foglio2").Select Cells(16, 2).Value = Val(TextBox1) End Sub
di patel data: 03/05/2016 17:56:42
così
Private Sub Textbox1_Change() Sheets("Foglio2").Select LR = Cells(Rows.Count, 2).End(xlUp).Row + 1 Cells(LR, 2).Value = Val(TextBox1) End Sub
Textbox
di Pietro78 (utente non iscritto) data: 03/05/2016 18:33:29
Funziona!! mi da un solo problemino....quando inserisco valori tipo 1000 nella textbox la macro mi riporta: 1 10 100 1000
può dipendere dal codice? o da qualche impostazione del formato cella?
Textbox
di Pietro78 (utente non iscritto) data: 03/05/2016 18:40:56
In pratica la macro nella textbox va a capo ogni volta che clicco un numero superiore a 1 cifra. Per esempio se inserisco il numero 5 viene inserito 5 nella cella indicata. Ma se inserisco 516 le celle si compilano cosi:
5
51
516
In pratica va a capo ogni volta che c'è più di 1 numero nel campo numero.
di Albatros54 data: 03/05/2016 18:46:30
inserisci la riga di codice che disabilita l'evento come sotto
ciao
albatros54
Private Sub Textbox1_Change() Application.EnableEvents = False Sheets("Foglio2").Select LR = Cells(Rows.Count, 2).End(xlUp).Row + 1 Cells(LR, 2).Value = Val(TextBox1) Application.EnableEvents = True End Sub
Textbox
di Pietro78 (utente non iscritto) data: 03/05/2016 18:53:16
Non cambia nulla
c'è un altro modo?
di Albatros54 data: 03/05/2016 18:59:32
togliere l'evento change, e associare il codice ad un pulsante.
albatros54
- Vuoi Approfondire?
