excel如何去掉行的线

1.Excle中如何删除两个表中相同的行（附件）

操作步骤： 1、打开Excel文件，按“Alt+F11”进入VBE编辑环境； 2、“插入”-》“模块”； 3、在右侧的代码编辑区域粘贴以下代码： Option Explicit Sub mark_rept() Application。

ScreenUpdating = False Dim k As Range, c As Range, rngSource As Range Dim strAdd As String With Sheets("sheet2") 。Cells。

Interior。ColorIndex = xlNone Set rngSource = Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) End With With Sheets("sheet1") 。 Cells。

Interior。ColorIndex = xlNone For Each k In Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) Set c = rngSource。Find(k, LookIn:=xlValues) If Not c Is Nothing Then strAdd = c。

Address Do Range(c, c。Offset(0, 4))。

Interior。Color = RGB(Int((254 * Rnd)), Int((254 * Rnd)), Int((254 * Rnd))) Range(k, k。

Offset(0, 4))。Interior。

Color = RGB(Int((254 * Rnd)), Int((254 * Rnd)), Int((254 * Rnd))) Set c = rngSource。FindNext(c) Loop While Not c Is Nothing And c。

Address strAdd End If Next End With Application。ScreenUpdating = True End Sub Sub delt_rept() Application。

ScreenUpdating = False Dim a As Range, b As Range With Sheets("sheet1") For Each a In Range(。 [A1], 。

Cells(。[A1]。

End(xlDown)。Row, 1)) If a。

Interior。ColorIndex xlNone Then Range(a, a。

Offset(0, 4))。Delete Shift:=xlUp Next End With With Sheets("sheet2") For Each b In Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) If b。Interior。

ColorIndex xlNone Then Range(b, b。Offset(0, 4))。

Delete Shift:=xlUp Next End With Application。 ScreenUpdating = True End Sub 4、关闭VBE，返回Excel表格界面，添加两个文本框，分别右键指定宏，如附件所示。

使用时，先按“标记重复数据”把重复的数据用背景色标记出来，然后使用“删除重复数据”来删除这些数据。 由于删除数据时记录指针会随着数据的删除而产生偏差，所以点击一次按钮只能删除部分重复数据，可以多次点击以完成删除工作。

特别提醒，使用前注意留一份备份，以防出现意外情况时不至于造成不必要的损失，养成好的备份习惯，有利于保护数据的完整和安全。 祝好~~ 。

2.Excel单元格内的隐藏符号怎么去除

方法1、用LEN函数计算单元格字符个数因为是看不见的空格或者符号，无法用肉眼来判断是否删除成功，这时需要用LEN函数来辅助判断。

比如在空白单元格B2中输入“=LEN(A2)”，就能计算出A2单元格中字符的个数。用LEN函数计算处理前和处理后的单元格字符个数，就能判断出是否删除成功了。

方法2、使用TRIM函数去除空格TRIM函数的语法格式及实例=trim(text)，用来删除字符串前后的空格，但是会在字符串中间保留一个作为连接用途。实例解说如图；方法3、使用CLEAN函数去除符号CLEAN函数的语法格式及实例=CLEAN(text)，要从text中删除非打印字符的任何工作表信息。

CLEAN 函数被设计为删除文本中 7 位 ASCII 码的前 32 个非打印字符（值为 0 到 31）。实例解说见图。

方法4、使用SUBSTITUTE函数去除空格和符号SUBSTITUTE函数语法及实例，=substitute(text,old_text,new_text,[instance_num])=substitute（需要替换的文本，旧文本，新文本，第N个旧文本），参数Instance_num ——为一数值，用来指定以 new_text （新文本）替换第几次出现的 old_text（旧文本）。参数Instance_num 可省略，这表示用 new_text（新文本）替换掉所有的old_text（旧文本）。

实例解说如图；方法5、使用LEFT、RIGHT、MID函数去除空格和符号，LEFT、RIGHT、MID函数语法格式及实例，=LEFT(text, [num_chars])，其中text为要取得给定值的文本数据源，num_chars表示需要从左开始算提取几个字符数，其中每个字符按1计数。RIGHT函数语法；=RIGHT(text,[num_chars])，其中text为要取得给定值的文本数据源，num_chars表示需要从右开始算提取几个字符数，其中每个字符按1计数。

MID函数语法；=MID(text, start_num, num_chars)，其中text为要取得给定值的文本数据源， start_num表示指定从第几位开始提取，num_chars表示需要从指定位置开始算提取几个字符数，其中每个字符按1计数。实列解说如图；。