面具电视剧:关于excel的问题

来源:百度文库 编辑:高校问答 时间:2024/04/28 10:37:11
如下面表格
A列 部件的型号 318188999
B列 适用的机器的种类 mda-23444s,mda-41351s,mdb-41212a,等等每个机种用逗号阁开.
如何把上述表格改为 mda-23444s 318188999
mda-41351s 318188999
mdb-41212a 318188999
的形式.
由于数据庞大 型号众多,每个部件型号对应的机器种类也很多,所以想请问比较合理的作法. VBA编程最佳.
谢谢yeshou004084的回答.A列中有很多行,都是型号,然后每个对应的机器的种类也很多.我觉得这样操作到是可行 但是如果手动操作起来 任务量是很大的哦! 在帮我想个好点的办法 谢谢拉!
谢谢qinqh_yl的回答,不过我操作起来有点疑问,把B列分列操作后,C,D.... 都是代表机器的种类,乃至后面很多列,或许是我太笨了,请大家帮我想想好办法 最好有VBA 高手,有段程序最好,程序好可以加分.

我不太明白你表格原来是怎么排列的,是不是A列只有一行,内容是“318188999”?B列也只有一行,内容是“mda-23444s,mda-41351s,mdb-41212a,...”?
如果是这样,那就好办:
1、处理A列的内容:将内容为“318188999”的单元格复制到C列的第一单元格和第二单元格,然后选中这两个单元格,鼠标移到这两个单元格的右下角直到出现黑点,然后点住该黑点不放往下拖,直到你想要的行数为止;
2、处理B列的内容:将B列单元格里的内容复制到Word里,全选,在菜单栏里点“替换”,将逗号替换为特殊符号的换行符,全部替换,替换之后原先的mda-23444s,mda-41351s,mdb-41212a,...就会变成
mda-23444s
mda-41351s
mdb-41212a
...
然后将这些内容复制到EXCEL里的B列。
这时就成了这样:
A B C
318188999 mda-23444s 318188999
mda-41351s 318188999
mda-41212a 318188999
... ...
你是不是还想把B列和C列的内容和并在一起?也可以做到,选中B列和C列,复制,粘贴到WORD里,想办法替换成如下形式:
mda-23444s,318188999
mda-41351s,318188999
mdb-41212a,318188999
...
再将内容复制到EXCEL里面,最后将逗号全部替换成空格就OK了

1、将B列分列成若干列。
选定B列,点“数据”->“分列”,按提示操作,分隔符号选逗号,完成后B列将变成若干列数据。
2、在表sheet2里例如B1输入:
=IF(Sheet1!B1="","",Sheet1!B1&" "&Sheet1!$A1)
3、选中B1,鼠标移到B1右下角黑点,直到鼠标变成小十字,然后点住不放往下拖,直到你想要的行数和列数为止。
然后sheet2就是你想要的数据了。
4、如果你想把所有行变成列,那就是复制粘贴的事了。
如果嫌麻烦,可以将sheet2数据复制到Word里,然后另存为纯文本,
在提示里选择添加换行符就行了。
Word里的替换功能也可以替换成换行符(在高级选项的特殊字符里)

第一步、将B列分列成若干列。
选定B列,点“数据”->“分列”,按提示操作,分隔符号选逗号,完成后B列将变成若干列数据。

第二步、将部件型号(A列)插入到所有机器种类的后面。
选定A列,点“复制”,在C列的列标题点鼠标右键,点“插入复制单元格”;重复此操作直到所有机器种类后面均有部件型号。
再删除A列。

第三步、合并所有数据。
选定CD两列的数据范围,点“复制”,在A列数据尾部空白单元格点“粘贴”。重复此操作,将所有数据移到AB两列。
删除C列以后所有内容。

第四步、整理数据
选定全表,按A列排序,此时所有B列有数据而A列无数据的行将集中到工作表的尾部,方便一次删除。

不用编写VBA,只要使用一个辅助工作表:

1.首先先将B列“分列”,方法楼上已有详述
2.确认B列分列操作以后最多的机种在哪一列(假设是N列)
3.添加一个新工作表sheet4,(假设数据在sheet1)
4.在sheet4的A1输入“=sheet1!A1”,复制部品品番
5.在sheet4的A2输入“=sheet1!A2&" "&$A1”,然后填充到N1
6.将sheet4的A行向下复制填充,直到与sheet1的品番行数相同即可。

1、光标放在B1单元格,菜单—数据—分列,以“逗号”为分隔符
2、选中此表,按复制,在另一空表的A1单元格,按鼠标右键,“选择性粘贴”,在其中的“转置”前打上勾,按“确定”。
3、在新表的B2单元格中输入公式:=A2&" "&$A$1(注意要用英文字符输入,引号中间是空格)
4、向下复制B2单元格的公式。OK