[RESUELTO] Macro copiar y pegar desde formulario

Discute sobre la aplicación de hojas de cálculo
Responder
carlosmle167
Mensajes: 5
Registrado: Sab Abr 22, 2017 8:26 pm

[RESUELTO] Macro copiar y pegar desde formulario

Mensaje por carlosmle167 »

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.
Ú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
OpenOffice 3.1 en Windows Vista
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: copiar y pegar

Mensaje por mauricio »

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
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
carlosmle167
Mensajes: 5
Registrado: Sab Abr 22, 2017 8:26 pm

Re: copiar y pegar

Mensaje por carlosmle167 »

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
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: copiar y pegar

Mensaje por fornelasa »

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!
carlosmle167
Mensajes: 5
Registrado: Sab Abr 22, 2017 8:26 pm

Re: copiar y pegar

Mensaje por carlosmle167 »

Un millon de gracias al foro al maestro Mauricio y ante todo a formelasa. que al final lo hizo todo.
Cañas para todos.
OpenOffice 3.1 en Windows Vista
carlosmle167
Mensajes: 5
Registrado: Sab Abr 22, 2017 8:26 pm

Re: copiar y pegar

Mensaje por carlosmle167 »

creo que se cierra asi
OpenOffice 3.1 en Windows Vista
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: copiar y pegar

Mensaje por mauricio »

mira el siguiente enlace: ¿Cómo marcar como RESUELTO un tema?

Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Responder