你少了个maintable=Name(也许这个多余了,试试看吧),然后
With Tables(name) .Select(0 ,0 ,.Rows.Count - 1, .Cols.Count - 1) End With