Insertar Filas segun segun el valor de una celda

[nloiacono]

Bunas a todos,
Necesito un macro que me inserte filas a partir de la fila 14 y la cantidad de filas es segun el valor que tenga en la celda K2.

Gracias

 

[Leopoldo Blancas]

Hola,

Sub a()
    Rows("14:" & 13 + Range("K2")).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

Saludos

 

[nloiacono]

Hola,

Sub a()
    Rows("14:" & 13 + Range("K2")).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Le agregue para que me copie todo el contenido en la fila 14, pero cuando inserta, si dice 1 en la celda K2 me inserta 2 y si dice 2 me inserta 3...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[nloiacono]

Bueno ahí va:

Sub a()
    If Range("K2") > 1 Then
        Rows("14:" & 13 + Range("K2") - 1).Insert Shift:=xlDown...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Funciona muy bien, pero me faltaria que me copie todo el contenido de la Fila 14 en las filas que inserte.

Gracias

En ningun momento lo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí