主题：各位大神,帮帮忙...

全选:

   With Tables("表名")

    .Select(0,0, .Rows.Count - 1, .Cols.Count - 1)

   End With

 清空:

With DataTables("表名").DataRows  
        .Delete()
End With