Actividad pública reciente
Ha valorado "Buena" la respuesta
Preguntita para expertisimos
Te adelanto algunas instrucciones, para obtener el fin de rango y copiar allí el dato: libre = sheets("Hoja2").Range("B65536").End(xlup).Row + 1 'para copiar el dato de B4 a col B de la Hoja2 Range("B4").Copy...