EXCEL怎样在同一列包含某一特定字符的单元格下面插入一行？

Question

如题所述

Answer 1

用函数作辅助列的办法，举个例子，假设文字在A1：A10中，要将其中带“张”字的单元格，下面插入一行，
办法1、在右边找一个辅助列，假设是B列，B1中输入1，B2中输入2，选中B1：B2，用自动填充柄下拉到B10，就会产生一个1到10的序列，B11中输入=SMALL(IF(ISNUMBER(FIND("张",A$1:A$10)),ROW($1:$10)+0.5),ROW(A1)) 同时按下CTRL+SHIFT+回车，输入数组公式，将B11下拉到出错为止，然后选中AB两列，以B列为关键字进行排序，最后把B列删除。
办法2、在B2中输入=IF(COUNTIF(A1,"*张*"),1,"") 下拉到B11，这时B2：B11处于被选中状态，按下F5，弹出定位对话框，勾选“公式”右边的圆圈，还有和公式下面四个勾中的“数字”，确定，就把那些数字1都选中了，开始，插入，插入工作表行（07版），插入，行（03版），再把B列删除。
（2021年12月18日）方法2修改，上面公式=IF(COUNTIF(A1,"*张*"),1,"")后面的，“”部分为多余，完全可以省略，公式可以改为=IF(COUNTIF(A1,"*张*"),1)

Answer 2

编辑---查找----某字符---全部查找。按住CTRL键，点中全部找到的数据，在表中选中的位置右键---插入---行。就一次插入多行了，但是，是插在特定字符的上一行。下一行不好办。

Answer 3

excel函数无法完成“插入一行”这个动作的，只能借助于vba宏了。

Answer 4

用宏来实现
比如说A列
Dim x For x = Range("a1000").End(3).Row To 1 Step -1 If Cells(x, 1) = "特定的字符" Then Rows(x).Insert Shift:=xlDown End If Next x

Answer 5

宏追问

EXCEL函数可以解决吗？

追答

有一种半自动的办法，就是新增一列公式为FIND("包含的特定字符",数据源,1)
1为从第一个字符开始
筛选有字符的这列，然后手动插入一列