Al eliminar columnas traspasar los datos

[JAI2009]

Hola amigos.

no es el mejor titulo para exponer el problema que os trasmito,

pero en el fichero que os adjunto creo haberme explicado para esta peticion.

Un saludo y muchas gracias

movimiento de celdas con sus importe.zip

[Antoni]

Sigue las instrucciones del adjunto.

Movimiento de celdas con sus importe.xls

[JAI2009]

Muchas gracias.

esta perfecto¡¡¡¡¡

pero como no tengo ni edea de macros, como puedo extrapolar tu codigo a mi archivo

, ya que las celdas eran imaginarias

(que deberia de cambiar)

Un saludo, un fuerte abrazo y muchas gracias.

[Antoni]

Solo tienes que sustituir "F12" por el rango inicial.

Private Sub Worksheet_Change(ByVal Target As Range): On Error Resume Next


If Target.Address(False, False) <> [B][COLOR=#ff0000]"F12"[/COLOR][/B] Then Exit Sub [B][COLOR=#ff0000]'Rango inicial[/COLOR][/B]



Application.EnableEvents = False

Range(Target.Offset(0, 2), Target.Offset(3, 9)).Copy Target.Offset(0, 1)

Target.Offset(0, 9) = CDate(Target.Offset(0, 8)) + 7

Range(Target.Offset(1, 9), Target.Offset(3, 9)).ClearContents

Application.EnableEvents = True



End Sub



[/CODE]

[JAI2009]

Saludos Oh Macro Antonio.

En estos momentos no tengo el archivo original para poder poner tu macro, que seguro que funciona a la 1000 maravillas.

Te comentaré si suerge algun problemilla alo ponr el rango inicial, ya que este lo tengo que poner en varias filas

Adjunto os remito el archivo.

Gracias.

Plan.zip

[JAI2009]

Hola nuevamente compañeros

Adjunto el archivo, para que lo podais entender mejor

en el archivo van las explicaciones

Saludos

Plan.zip

[Antoni]

Esto se complica por momentos, mañana te digo algo, pero no pinta bien.

[JAI2009]

Esto se complica por momentos, mañana te digo algo, pero no pinta bien.

Gracias

si pinta pinta y si no al Museo del Prado

Saludos

[Antoni]

Se me ha encendido la luz.

En el adjunto encontrarás la macro que hace lo que pides.

La hoja "Plantilla" verás que so lo tiene la parte afectada por la macro. (Lo he hecho para trabajar mas a gusto)

También he añadido la hoja "Fórmulas", es una hoja de trabajo necesaria para la macro, puedes ocultarla.

Esperemos que funcione.

PlantillaTesoreria.xls

[JAI2009]

Primro muchas gracias.

perdona mi ignorancia que tengo que hacer para tener todo el cuadro

Saludos

[Antoni]

Tu ganas, atento al mensaje privado.