Grabar varios Textbox vba

Quisiera que me ayudes por favor con este temita:
En un userform1, tengo 50 textbox que van desde textbox1 ... Hasta textbox50.
¿Pregunta como puedo hacer para grabar los 50 cajas de textbox que se encuentren con datos en la columna "a", el registro debe de ser hacia cada fila es decir ; comienza en la fila a1... Hasta que llegue a la ultimo a50 por ejemplo( considerar que solo debe de registrar las cajas de texto que contiene datos).
Respuesta
1
Mi propuesta es que al inicializar el UserForm cargues esos 50 datos. El código sería:
Private Sub UserForm_Initialize()
Dim i As Integer
Dim dtexto As String
For i = 1 To 50
dtexto = Worksheets("Hoja1").Range("A" & i).Value
If dtexto <> "" Then
Me.Controls("Textbox" & i).text = dtexto
End If
Next i
End Sub
Disculpa.
¿Pero cómo haría para que se almacene en las celdas de arriba hacia abajo?
Vamos a ver. Aclarate. ¿Quieres pasar los datos de las celdas a los textbox o vievcersa? En tu primer post entiendo que los datos están en las celdas y quieres cargarlos a los textbox. Si es justo lo contrario simplemente dale la vuelta a la copia de los datos y escríbela como:
For i = 1 To 50
dtexto = Me.Controls("Textbox" & i).text
If dtexto <> "" Then
Worksheets("Hoja1").Range("A" & i).Value = dtexto
End If
Next i

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro diseñada para copiar registros de un form a una hoja excel

Segundo diseñe esta macro para que copie los valores del textbox a una hoja excel llamada histórico, pero que primero busque en la hoja histórico la fila a partir de la 2 en la columna 1 la vacía y lo copie pero no lo hace me podrías decir en que...
1 respuesta

Macro para buscar y ordenar datos vertical

Necesito ordenar los datos que están horizontal y dejarlos en vertical, tengo un rango de datos A2:D50, donde A2, tiene 3 códigos asociados, estos 3 códigos deben quedar ordenados verticalmente en la columna B y en la columna A repetir código barra....
1 respuesta

Buscar dentro de matriz excel

Tengo una matriz de datos de m*m con las distancias de puntos( coordenadas). Necesito buscar aquellas coordenadas que la distancia sea menos a 200 ycopiar las coordenadas a otra hoJa.
1 respuesta

Macro para colocar datos según cabecera de columna y fila ingresada.

Elabore un UserForm donde ingreso datos a una hoja de excel seleccionando los datos de un combobox y se va ingresando uno debajo de otro. Pero al tercer ingreso se empieza a grabar uno arriba de otro. Las columnas no siempre se llenan todas y...
1 respuesta

Exportar listbox a Excel

El día de ayer formulé una pregunta, respecto de una aplicación en la que estoy intentando trabajar, un experto me respondió de inmediato (Elsa Matilde), de acuerdo a la respuesta entregada, pude desarrollar todas las sugerencias entregadas excepto...
1 respuesta

Formulario de búsqueda en Excel

Estoy empezando en esto del VBA, con un formulario de búsqueda, donde identifica la descripción de una actuación y me muestra su estado de ejecución, presupuesto, ubicación, etc. He visto cosillas por ahí y he podido crear un código, el problema es...
1 respuesta

Comparar dos celdas de dos hojas distintas EXCEL

Tengo dos hojas en mi excel, y necesito buscar los valores de una columna de la primera hoja en la segunda. Si se encuentra en la segunda, tengo que copiar el valor de otra columna de dicha fila y pegarla en la primera hoja en la ultima columna. Ya...
1 respuesta