nopcor 31

Espero puedan ayudarme, mi problema es el siguiente necesito un macro que me corte en rango de celdas que yo escoja uso este Selection. Cut x = ActiveCell.Address ActiveCell.Offset(2, 0).Select ActiveSheet.Paste Range(x).Select End Sub El problema es...