Immissione dati textbox su foglio

Hai un problema con Excel?

Nuova discussione

Immissione dati textbox su foglio
di trump61 data: 18/02/2016 12:54:58
Salve a tutti, devo trasferire dei dati da una TextBox su userform ad una su un foglio di lavoro, non so come potere con il codice fare questo perchè non riesco a richiamare la textbox sul foglio.
avviato il registratore di macro ho trovato questa questa riga di codice :
ActiveSheet.Shapes.Range(Array("TextBox1")).Select
ho quindi pensato di modificarlo così
Dim sh1 As Worksheet: Set sh1 = Worksheets("Scheda")
sh1.Shapes.Range(Array("TextBox1")).Value = UserForm1.TextBox1.Value
ma non funziona.
qualcuno gentilmente puo' dirmi quale codice devo usare per richiamare la textbox activex che sta su foglio
Grazie
di patel data: 18/02/2016 17:14:40
prova con
sh1.Shapes.Range(Array("TextBox1")).text = UserForm1.TextBox1.text

se non funziona allega un file di esempio
di trump61 data: 19/02/2016 16:57:35
ok ora provo grazie
di trump61 data: 19/02/2016 17:24:40
Ciao non funziona, il codice sta sul CommandButton della UserForm1, inizialmente avevo creato una cella grande per trasferirci i dati ma non andava a capo quindi non andava bene per quello che serviva a me, le note possono essere molto lunghe. quindi ho pensato di mettere una textbox impostando la sua proprietà mulltiline a true, forse per motivi di prove la textbox sul file che ho allegato è spostata esternamente alla scheda. Ci sono codici da migliorare, non essendo un esperto solitamente prima faccio in modo che funzioni poi cerco di migliorare il file dove posso in base alle mie conoscenze e al vostro aiuto, sicuramente vi si drizzeranno i peli, abbiate pietà di un povero e ostinato principiante
di Albatros54 data: 19/02/2016 17:37:12
Se ho capito bene, seleziona la cella B36, tasto DX formato celle e metti la spunta su "A testo capo " e nel codice fai la prova ad abilitare la riga:
sh1.Range("B36").Value = UserForm1.TextBox1.Value
di trump61 data: 19/02/2016 18:54:43
Grazie non si finisce mai di imparare questa non la sapevo
di Albatros54 data: 19/02/2016 19:11:14

Vuoi Approfondire?