Escribir datos de formularios en hojas de cálculo.

Hola a todos, necesito que me ayuden con lo siguiente por favor. Les cuento. Tengo varios formularios (en vba) con muchos datos que quisiera exportar a una hoja de cálculo, en modo de informe resumen. Eso no es problema. El problema es que quiero que reconozca el formulario que se abrió y rellene la hoja de cálculo con los datos que realmente se obtuvieron, sin tener celdas predefinidas para cada formulario, si no que escriba en orden de llegada. Por ejemplo, si tengo:
Formulario1, Formulario2, Formulario3, Formulario4, y abro el Formulario3, luego el Formulario2, etc.. , quiero que escriba los datos del Formulario3, luego del Formulario2, etc.., sin predefinir celdas para cada valor que se escriba en el resúmen, para que así no existan celdas en blanco, y los datos del "informe resúmen" se escriban de corrido.
Ojalá alguien pueda ayudarme, saludos y muchas gracias.
BSS

1 respuesta

Respuesta
1
En primer lugar definí una variable pública (En algún módulo, tu primer línea debiera ser:
Public fila1 as Long
Esta variable guardará la primer fila libre de la hoja resumen
Entonces en cada formulario tendrás 1 rutina similar de pase de datos:
fila1 = sheets("resumen").range("A65536").end(xlup).row + 1
'pase de controles a cada col
sheets("resumen").cells(fila1,1) = textbox1    'pase a col 1
sheets("resumen").cells(fila1,2) = combobox1   'pase a col 2
Lo que variará en cada UF es el nbre de control

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas