Nick,
Eu mudei o macro - tentar por favor a lima unida preferivelmente.
>Se no futuro eu preciso de adicionar adiciona números adicionais ao último número na grade, aquela será possível?
Sim, você pode adicionar à grade manualmente. Mas os pleae anotam que enquanto eu tenho definir a grade enquanto .UsedRange você não pode ter qualquer outra coisa na folha.
Patrick