INSERTAR FILAS CON FORMULAS

6 envíos / 0 nuevos
Último envío
Rayner Velez
Imagen de Rayner Velez
Offline
última acción: Hace 4 años 9 meses
alta: 24/06/2018 - 18:23
Puntos: 265
INSERTAR FILAS CON FORMULAS

saludos

alguien me podria ayudar complementando el sgte codigo

lo que trato es cada vez que inserte un conjunto de filas, éstas tambien incluyan el mismo formato y formulas de la fila 5

en el archivo que adjunto esta el ejemplo, sin embargo tengo que mencionar que este no me presenta problema sino otro archivo con mas registros,, y cada vez que inserto filas no me copia las formulas ni mucho menos el formato,

de antemano gracias

a continuacion el codigo que estoy usando para insertar las filas


Sub Insertar_Filas()

 

    Dim numFilas As Long

     

    'Preguntar al usuario por el número de filas a insertar

    numFilas = Application.InputBox(Prompt:="Filas a insertar:", Type:=1)

     

    'Validar si el número de filas indicado es superior a cero

    If numFilas > 0 Then

        'Insertar filas

   Application.ScreenUpdating = False

        Rows(ActiveCell.Row & ":" & ActiveCell.Row + numFilas - 1).Insert

    End If

 

End Sub

AdjuntoTamaño
File inserta_fila_con_formulas.xlsm28.17 KB

Etiquetas: 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 5 horas 18 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
Donde estás insertando las

Donde estás insertando las filas es en medio de una tabla. El comportamiento por defecto es copiar formatos y fórmulas.

Si en el otro archivo no lo hace es porque el formato está definido en celdas sueltas, pero no en toda la tabla, y lo mismo con las fórmulas. así qeu cuando insertas nuevas filas le aplica el formato de la tabla, que por lo que comentas es distinto de lo que tú crees que es el formato de la tabla.

Prueba a redefinir el formato de la tabla que te da problemas.

 

 

------
Ya sé Excel, pero necesito más.

Rayner Velez
Imagen de Rayner Velez
Offline
última acción: Hace 4 años 9 meses
alta: 24/06/2018 - 18:23
Puntos: 265
gracias por tu respuesta

gracias por tu respuesta paco

me resulto, quitandole el formato y agregandolo nuevamente a toda la fila (el problema del formato esta resuelto)

sin embargo, el problema de la formula no esta resuelto

es posible agregarle al codigo, una instruccion para que luego de insertar las filas  ( o seleccion cualquiera)

las formulas de la fila que estan debajo del encabezado, se peguen en las filas insertadas

Rayner VZ

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 5 horas 18 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
Cuando una fórmula se define

Cuando una fórmula se define en una tabla, se extiende también automáticamente a las nuevas filas, así que imagino que habrá fórmulas que no se aplican a toda la columna y por eso no las está considerando como algo general para toda la tabla.

Intenta redefinir la fórmula, selecciona una celda con fórmula, pulsa [F2] para editarla, y pulsa Intro a continuación para introducirla; te debería aparecer un mensaje dando la posibilidad de sobrescribir toda la columna con esa fórmula. Aparece como un icono junto a la celda tras introducir la fórmula.

sobrescribir fórmula en columna de una tabla en Excel

tras hacer esto, la fórmula se aplicará a toda la columna, y también a las nuevas filas que se vayan insertando.

 

------
Ya sé Excel, pero necesito más.

karelanda
Imagen de karelanda
Offline
última acción: Hace 4 años 10 meses
alta: 13/05/2019 - 20:56
Puntos: 35
Duda

Disculpe la molestia, no soy muy buena en VBA. Si yo solo quiero insetar una fila (siempre esa misma fila)

 

yetro (no verificado)
Imagen de yetro
Hola Paco, estuve tratando de

Hola Paco, 

estuve tratando de resolver este mismo problema y sin ser experto me parece que el camino que indicas es el correcto, sin embargo no logro conseguir que me aparesca el cuadro que dice sobrescribir todas las celdas en esta columna con esta fórmula.  Solo me aparece lo siguiente:

 

Existe algún otro camino para esto?.

 

saludos