Poner un texto largo de un TextBox, en varias filas en la hoja de excel
Necesito colocar un texto largo de un textBox en varias celdas de una hoja de excel.
por ejemplo el siguiente texto:
"Pago de transferencias electrónicas internacionales de dinero en Mexico; las condiciones para los servicios que nos son propiedad de telecomunicaciones de"
Como el texto anterior no podría visualizarse en una sola celda, a menos que se ajusten los anchos de celda y ajuste de texto, pero como esto afectaría el tamaño de impresión de la hoja, requiero que el texto anterior se distribuya en varias celdas, ejemplo:
celda "C10" Pago de transferencias electrónicas internacionales de dinero
celda "C11" en Mexico; las condiciones para los servicios que nos son
celda "C11" propiedad de telecomunicaciones de
esta es una pregunta, la siguiente es que tengo un userform para introducir datos donde viene lo siguiente:
Private Sub CommandButton2_Click()
'LLENA DATOS
Dim Cant As String
Dim Des As String
Dim Pu As String
Dim Un As String
Cant = TextBox3
Des = TextBox4
Pu = TextBox5
Un = TextBox6
UserForm5.Label6 = Cant
UserForm5.Label7 = Des
UserForm5.Label8 = Pu
UserForm5.Label10 = Un
UserForm5.TextBox3 = Label6
UserForm5.TextBox4 = Label7
UserForm5.TextBox5 = Label8
UserForm5.TextBox6 = Label10
Worksheets("FACT").Activate
Range("A15").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Activate
Loop
ActiveCell.Offset(0, 0) = Label6.Caption
ActiveCell.Offset(0, 1) = Label10
ActiveCell.Offset(0, 2) = Label7
ActiveCell.Offset(0, 7) = Label8
Unload UserForm5
Load UserForm5
UserForm5.Show
End
Unload UserForm5
End Sub
los datos se llenan y continúan en la siguiente fila, el problema es cuando introduzco texto demasiado largo en "cant (textbox3)" , no se visualiza, en caso de visualizar el texto en varias celdas, que cambiaría para que no se afecte la secuencia, ejemplo:
ejemplo de como quiero que funcione
Fila 14 Cantidad Unidad Descripción P.U.
Fila 15 3 serv Mantenimiento del inmueble ubicado en $3,850.89
Fila 16 Av. Desierto de los bosques No. 234, los
Fila 17 trabajos consisten en: etc etc.
Fila 18 8 Limp Limpieza de áreas de trabajo $396.00
Fila 19 2 Pul Lavado de alfombra de 35m2, y aspirado $956.78
pisos de las.......etc.
cuando en descripción son textos largos quiero que se ubique en varias celdas, pero al llenar el siguiente concepto en el userform, deseo que siga la secuencia.
Espero me puedan apoyar, desde ya les agradezco cualquier información.