[RESUELTO] Macro copiar y pegar desde formulario
-
- Mensajes: 5
- Registrado: Sab Abr 22, 2017 8:26 pm
[RESUELTO] Macro copiar y pegar desde formulario
Ante todo Muy buenas lo que sea y gracias.
Creo que e leido casi todo pero de entrada pido disculpas porque no lo pillo.
Creo que es muy facil, pero yo soy muy torpe, cuando miro la explicacion en wiki no se donde pongo los rangos ni las celdas.
Asi que hay esta el temo os explico tengo hecho un formulario en una pagina unas 8 celdas de arriba hacia abajo y cuando pulso el boton que e creado me pase los datos a la tabla que esta en otra Hoja de ese mismo libro.
Creo que e leido casi todo pero de entrada pido disculpas porque no lo pillo.
Creo que es muy facil, pero yo soy muy torpe, cuando miro la explicacion en wiki no se donde pongo los rangos ni las celdas.
Asi que hay esta el temo os explico tengo hecho un formulario en una pagina unas 8 celdas de arriba hacia abajo y cuando pulso el boton que e creado me pase los datos a la tabla que esta en otra Hoja de ese mismo libro.
Última edición por SLV-es el Lun May 29, 2017 12:30 pm, editado 3 veces en total.
Razón: Marcado como resuelto por los comentarios del usuario. Cambiado el título por uno menos ambigüo
Razón: Marcado como resuelto por los comentarios del usuario. Cambiado el título por uno menos ambigüo
OpenOffice 3.1 en Windows Vista
Re: copiar y pegar
Hola...
¿podrías mostrarnos el enlace al wiki donde miras?, y muestranos como lo estas haciendo, para ver donde esta el problema, si ademas anexas un archivo donde se vea lo que tienes y como lo has intentado, será más fácil para quien quiera ayudarte...
Saludos
¿podrías mostrarnos el enlace al wiki donde miras?, y muestranos como lo estas haciendo, para ver donde esta el problema, si ademas anexas un archivo donde se vea lo que tienes y como lo has intentado, será más fácil para quien quiera ayudarte...
Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
-
- Mensajes: 5
- Registrado: Sab Abr 22, 2017 8:26 pm
Re: copiar y pegar
en la parte azul claro de la pagina formulario es donde inserto los datos y quiero que se pasen a datos en realidad es mas grande pero esta en el trabajo y aqui es donde tengo el problema
- Adjuntos
-
- mio.ods
- (10.54 KiB) Descargado 163 veces
OpenOffice 3.1 en Windows Vista
Re: copiar y pegar
Intenta con:
Código: Seleccionar todo
Sub Traspaso
doc = ThisComponent
hojas = doc.getSheets()
hojaDatos = hojas.getByName("Datos")
hojaFormulario = hojas.getByName("Formulario")
formulario = hojaFormulario.getCellRangeByName("C4:C13")
celdaA1 = hojaDatos.getCellRangeByName("A1")
cursor = hojaDatos.createCursorByRange(celdaA1)
cursor.collapseToCurrentRegion
ultFila = cursor.RangeAddress.EndRow + 1
For i = 0 To UBound(formulario.getDataArray())
hojaDatos.getCellByPosition(i, ultFila).Formula = formulario.getDataArray() (i)(0)
Next
End Sub
- Adjuntos
-
- mio.ods
- Traspasar
- (12.77 KiB) Descargado 195 veces
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
-
- Mensajes: 5
- Registrado: Sab Abr 22, 2017 8:26 pm
Re: copiar y pegar
Un millon de gracias al foro al maestro Mauricio y ante todo a formelasa. que al final lo hizo todo.
Cañas para todos.
Cañas para todos.
OpenOffice 3.1 en Windows Vista
-
- Mensajes: 5
- Registrado: Sab Abr 22, 2017 8:26 pm
Re: copiar y pegar
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro