¿Como hago para pasar datos de textbox a una celda de excel?

Tengo duda en como acomodar los datos de un textbox a varias celdas de excel, por ejemplo poner números separados por comas en el textbox y cada uno de estos estén en una celda.

1,2,3 y en la celda A2 este el 1, en la celda A3 este el 2 y así sucesivamente

1 Respuesta

Respuesta
1

H o l a:

¿En dónde tienes el textbox? ¿Es de un userform? ¿Lo tienes en la hoja como un control de formulario? ¿O lo tienes en la hoja como un control active x?

sí es de un userform y es como un formulario (:

H  o l a:

Pon el siguiente código en un commandbutton:

Private Sub CommandButton1_Click()
'Por.Dante Amor
    If TextBox1 = "" Then
        MsgBox "Captura valores en el textbox"
        TextBox1.SetFocus
        Exit Sub
    End If
    '
    datos = Split(TextBox1, ",")
    j = 2
    For i = LBound(datos) To UBound(datos)
        Cells(j, "A") = datos(i)
        j = j + 1
    Next
    MsgBox "Fin"
End Sub

Escribe los datos en el textbox separados por comas, presiona el botón y los datos se pasarán a las celdas.


':)
':)

Añade tu respuesta

Haz clic para o
El autor de la pregunta ya no la sigue por lo que es posible que no reciba tu respuesta.

Más respuestas relacionadas