Question

excel为什么突然没有表格边框线？

不需要你说选择->设置内框线、外框线的方法，因为无法一个个选择，也不能全部一次性选择，太多太多了，就像下图，学生考试的台角号（座位上的标签），几千学生，每一个的台角号是独立的，分隔的，无法一个个选择，有什么好办法？注意：数据已填好，不能覆盖，只能加线，不能先做好这些表格再去填数据，数据已存在。





Answer 1

直接刷格式，会提示这个，因为数据中有部分单元格是合并过的。

操作方法：

1、选定全部数据，鼠标右键==》设置单元格格式==》对齐==》取消合并单元格，效果如下：

2、对首组数据进行合并，设置好框线等格式

3、选择调整好的数据区（包含中间的分隔行），使用选定区右下角的句柄（小十字）使用鼠标右键下拉到最后一行，选择仅填充格式，效果如下

4、同理，将该列数据（含空列）选定有向右拖动，同样填充格式，完成操作。

Answer 2

excel表格右边没有边框线，可在变宽设置中添加边框线。

方法步骤如下：

1、打开需要操作的EXCEL表格，选中需添加边框线的单元格，在开始选项卡找到“边框”，点击旁边的下拉按钮。

2、在下拉选项中选中“所有框线”即可。

3、返回EXCEL表格，发现已添加所有边框线。

4、通过“Ctrl+P”，在打印预览中可以清楚看到表格的框线可以完整打印出来了。

Answer 3

图1

1，将第一个区域的需要添加边框设置好，然后选择框框（包括一列空白）区域点刷新按钮，去刷新同一排的其它区域

2、这样第一排数据边框就会正常了

3、再选择第一排区域，如图2，再去刷新其它区域即可。

图2

表格边框没有，一般是误操作。会不会在全选的情况下不小心点了下表格边框，如下图3

图3

也有可能无意中按了组合件，取消了边框

Answer 4

第一步，选择一台设置好边框，选择一台以及后面的分割行列（下图红框）复制：

第二步，选择所有的数，以及后面和下面的多一个空行、空列，选择性粘贴、格式（如下图）就完成了。

Answer 5

看样子是清除了原有的格式。不过可以用代码添加边线。

Sub Demo()

    Set FindRng = ActiveSheet.UsedRange

    With FindRng

        Set C = .Find(What:="试室", LookAt:=xlPart)

        If Not C Is Nothing Then

            FirstAddress = C.Address

            Do

                With C.CurrentRegion

                    .Borders.TintAndShade = 0

                    .BorderAround Weight:=xlMedium

                    .HorizontalAlignment = xlCenter

                End With

                Set C = .FindNext(C)

            Loop While Not C Is Nothing And C.Address <> FirstAddress

        End If

    End With

End Sub

这是运行前后对比图