怎么将A列的数据选择粘贴在B列？

我是小宝宝

如图所示 ，如何将A列中包含部门的字段复制到B列中，因为数据量过多，所以不想一个一个手动进行粘贴，是否用VBA可以实现，求各位大神帮助！！！！！！！！附件在下面 示例.rar (16.85 KB, 下载次数: 19)

2018-2-27 14:19 上传

点击文件名下载附件

梦幻小丑

1. =IF(A3="","",LEFT(A3,FIND("】",A3)))

复制代码

Look我在这

1. =IF(ISNUMBER(FIND("部门",A3)),LEFT(A3,FIND("】",A3)),"")

复制代码

dengjq2000

可以通过基本操作：数据 - 分列

可以通过公式，单元格 B3 公式：

1. =TRIM(MID(SUBSTITUTE(SUBSTITUTE($A3,"】","】+"),"+",REPT(" ",99)),99*COLUMN(A:A)-98,99))

复制代码

往右往下拉。把所有进行分列

rssoo

=IF(ISNUMBER(FIND("部门",A3)),LEFT(A3,FIND("】",A3)),"")

袁勇

1. =IFERROR(TEXT(LOOKUP(1,0/FIND("部门：",TRIM(MID(SUBSTITUTE("】"&A3&"【","】【",REPT(" ",100)),ROW($2:$10)*100-99,100))),TRIM(MID(SUBSTITUTE("】"&A3&"【","】【",REPT(" ",100)),ROW($2:$10)*100-99,100))),"【@】"),"")

复制代码

樱花片雪2

楼主，B3=IFERROR(MID(A3,1,FIND("】",A3,1)),"")

我是小宝宝

Look我在这 发表于 2018-2-27 14:27

那要是需要粘贴所有包含项目的单元格呢？

袁勇

我是小宝宝 发表于 2018-2-27 14:48
那要是需要粘贴所有包含项目的单元格呢？

果然有此一问。虽然我在7楼的公式长，但通用性好。

将“部门”改为”项目“，且不受位置限制。