Buenas tardes,
Mi nombre es Andres, agradezco de su colaboración para la siguiente inquietud; estoy realizando un proyecto en el cual paso una información de la hoja1 a la hoja2, sin embargo, deseo introducir una formula en la cual quede registrada en la hoja 2 en un campo especifico, pero no se como hacer para que quede y vaya bajando la formula cada vez que vaya actualizando la base.
Tengo el siguiente código para guardar la informacion de la hoja1 a la hoja2, agradezco de su colaboración.
Sub GuardarA
doc = ThisComponent
fuente = doc.Sheets.getByName("Hoja1")
A = fuente.getcellrangebyname("L2")
B = fuente.getcellrangebyname("M2")
C = fuente.getcellrangebyname("N2")
D = fuente.getcellrangebyname("O2")
Id_agendamiento = A.String
Direccion_territorial_atencion = B.String
Departamento_atencion = C.String
Punto_atencion = D.String
destino = doc.Sheets.getByName("Hoja2")
arranque = destino.getCellRangeByName("D1")
cursor = destino.createCursorByRange(arranque)
cursor.collapseToCurrentRegion
fila = cursor.rangeAddress.endRow + 2
destino.getCellRangeByName("D" + fila).String = Id_agendamiento
destino.getCellRangeByName("E" + fila).String = Direccion_territorial_atencion
destino.getCellRangeByName("F" + fila).String = Departamento_atencion
destino.getCellRangeByName("G" + fila).String = Punto_atencion
End Sub
Insertar una formula en un campo
Reglas del Foro
Los moderadores podrían mover los temas creados aquí a un foro más apropiado.
Si usted publicó aquí y no encuentra el tema, puede buscar sus mensajes haciendo clic en la opción «Buscar sus mensajes» que se encuentra justo debajo de la cabecera de la página, junto al panel de control de usuario y al acceso a sus mensajes privados.
Los moderadores podrían mover los temas creados aquí a un foro más apropiado.
Si usted publicó aquí y no encuentra el tema, puede buscar sus mensajes haciendo clic en la opción «Buscar sus mensajes» que se encuentra justo debajo de la cabecera de la página, junto al panel de control de usuario y al acceso a sus mensajes privados.
-
- Mensajes: 15
- Registrado: Mié Jul 04, 2018 5:35 pm
Insertar una formula en un campo
Última edición por Andres Lote el Jue Ago 02, 2018 2:40 pm, editado 1 vez en total.
Open office 4.1.3 windows 7 profesional
Re: Insertar una formula en un campo
Yo no entiendo esta parte:
deseo introducir una formula en la cual quede registrada en la hoja 2 en un campo especifico, pero no se como hacer para que quede y vaya bajando la formula cada vez que vaya actualizando la base.
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: 15
- Registrado: Mié Jul 04, 2018 5:35 pm
Re: Insertar una formula en un campo
Buenas tardes, se tiene un formulario en la hoja1 y la macro guarda la información de dicha hoja en la hoja2, y lo que deseo es que en la columna (I) se introduzca una formula y que esta se vaya arrastrando cada vez que vaya ingresando un nuevo registro.
Adjunto plantilla, y en el hoja dos se encuentra la formula la cual quiero que se vaya ingresando o registrando cada vez que ingreso un registro.
Gracias por su colaboración.
Adjunto plantilla, y en el hoja dos se encuentra la formula la cual quiero que se vaya ingresando o registrando cada vez que ingreso un registro.
Gracias por su colaboración.
- Adjuntos
-
- Form.ods
- (22.19 KiB) Descargado 211 veces
Open office 4.1.3 windows 7 profesional
Re: Insertar una formula en un campo
Una posible opción:
Código: Seleccionar todo
destino.getCellRangeByName("I2").Formula = "=D2&"&""" """&"&E2&"&""" """&"&F2"
destino.CopyRange(destino.getCellRangeByName("I" + fila).cellAddress, destino.getCellRangeByName("I2").rangeAddress
MsgBox "Listo"
- Adjuntos
-
- Form.ods
- expandir formula
- (21.36 KiB) Descargado 221 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: 15
- Registrado: Mié Jul 04, 2018 5:35 pm
Re: Insertar una formula en un campo
Buenos dias,
Muchas gracias, fue muy útil su ayuda e información suministrada ya pude terminar con el proyecto propuesto.
Saludos
Muchas gracias, fue muy útil su ayuda e información suministrada ya pude terminar con el proyecto propuesto.
Saludos
Open office 4.1.3 windows 7 profesional