俺的不传之密,送你了。
颜色设为一样后,再加上
Tables("物料清单").Grid.Styles.Normal.Border.Style = 0 ‘去单元格边框Tables("物料清单").Grid.Styles.EmptyArea.Border.Style = 0 ’去表格边框