早教吧作业答案频道 -->其他-->
excel问题如何将excel中将B列数据按下列要求处理A列是拼音,B列是和A列拼音对应的汉字.如何使同音汉字按如下表示分成C、D、E、F……列.请高手指教,先谢过了.A列B列C列D列……列zhishi知识
题目详情
excel问题 如何将excel中将B列数据按下列要求处理
A列是拼音,B列是和A列拼音对应的汉字.如何使同音汉字按如下表示分成C、D、E、F……列.请高手指教,先谢过了.
A列 B列 C列 D列 ……列
zhi shi 知识 只是 指示 指使
zhi shi 只是
zhi shi 指示
zhi shi 指使
yi sheng 医生 一生 一声 异声 医圣
yi sheng 一生
yi sheng 一声
yi sheng 异声
yi sheng 医圣
ji xu 继续 积蓄 几许 记叙
ji xu 继续
ji xu 积蓄
ji xu 几许
ji xu 记叙
记过有一个公式,可这个公式找不到了
A列是拼音,B列是和A列拼音对应的汉字.如何使同音汉字按如下表示分成C、D、E、F……列.请高手指教,先谢过了.
A列 B列 C列 D列 ……列
zhi shi 知识 只是 指示 指使
zhi shi 只是
zhi shi 指示
zhi shi 指使
yi sheng 医生 一生 一声 异声 医圣
yi sheng 一生
yi sheng 一声
yi sheng 异声
yi sheng 医圣
ji xu 继续 积蓄 几许 记叙
ji xu 继续
ji xu 积蓄
ji xu 几许
ji xu 记叙
记过有一个公式,可这个公式找不到了
▼优质解答
答案和解析
用VBA轻松搞定!
把文件给我,我在你的文件里直接编程.
Sub run() '使用前务必在表格中按A列进行扩展排序
Dim i As Integer
Dim j As Integer
Dim k As Integer
j = 1
i = 1
one:
If Cells(i,1) = "" Then Exit Sub '如果遇到空行就停止,也就是到了A列的尾
k = 2
For j = i + 1 To 10000
If Cells(j,1) = Cells(i,1) Then
k = k + 1
Cells(i,k) = Cells(j,2)
Else
Exit For
End If
Next
i = j
GoTo one
End Sub
把文件给我,我在你的文件里直接编程.
Sub run() '使用前务必在表格中按A列进行扩展排序
Dim i As Integer
Dim j As Integer
Dim k As Integer
j = 1
i = 1
one:
If Cells(i,1) = "" Then Exit Sub '如果遇到空行就停止,也就是到了A列的尾
k = 2
For j = i + 1 To 10000
If Cells(j,1) = Cells(i,1) Then
k = k + 1
Cells(i,k) = Cells(j,2)
Else
Exit For
End If
Next
i = j
GoTo one
End Sub
看了excel问题如何将excel...的网友还看了以下:
急用复制与粘帖的问题假设每隔一列有一组数据(即A'C'E等列有数据,B'D列是空列),现在想把C' 2020-04-06 …
we的e在英音里发/i/还是/:e/的音?me的e在英音里发/i/还是/:e/的音?he的e在英音 2020-05-13 …
在Excel中,()数据是使用最多,也是最为复杂的数据类型。该类型数据由数字0~9、正号、负号、小数 2020-05-31 …
已知一组数据a,b,c,d,e,b,e,e,a,且a>b>c>d>e,这组数据的众数是多少,中位数 2020-06-02 …
英语音节开闭于划分(重金悬赏)同样是e,比如zero和seven发音却大相径庭,一个是长元音,一个 2020-06-23 …
e导数是多少?e的导数是0,但是根据e^x=e^x,当x=1时,e^1=e,e的倒数是它本身, 2020-07-31 …
圆的面积是800怎样求半径pencil的e的音标是什么welcome的o的音标welcome的e音标 2020-10-29 …
感叹句what修饰名词时只用a,而不能用an吗?还有ing的加法,单词后面有e,e发音不去e,加不发 2020-11-15 …
关于声音数据量的计算问题一分钟双声道、8bit量化位数、22.05kHz采样频率的声音数据量是2.6 2020-11-20 …
单数名词变复数中有一条准则是“以辅音字母+y结尾的,变y为i再加es"其中的辅音字母说的是什么?是根 2021-02-05 …