vba如何獲取未知的列號和行號！！！

i=range("A65536").end(xlup).row'最大行號

j=range("A1").end(xltoright).column'最大列號

range("A1").resize(i,j).borders.linestyle=1'添加邊框

end sub