Tempo de leitura: menos de 1 minuto
Como inserir bordas em um intervalo de células usados em determinada folha de planilha
Sub inserir_borda_em_toda_regiao_usada()
set f1 = Planilha1
f1.[A1].CurrentRegion.BorderAround Weight:=xlThin
f1 = Nothing
End Sub