Elsa Matilde respondió:
Te dejo algunas instrucciones que te servirán para agregar a tu macro: Sub rangos() 'x Elsamatilde 'selecciona el rango y coloca la referencia en una variable Range("A1", Range("A1").SpecialCells(xlLastCell)).Select dire = Selection.Address MsgBox...