摘要： 步骤如下： 1.ALt F11，打开VBE界面，左上角空白处，点击右键，插入模块
2.在模块的空白处，粘贴上如下代码：Excel表格中多个表格的文字拼音如何快速整合在一个表...
步骤如下：
1.ALt F11，打开VBE界面，左上角空白处，点击右键，插入模块
2.在模块的空白处，粘贴上如下代码：
Excel表格中多个表格的文字拼音如何快速整合在一个表格内
Excel表格中多个表格的文字拼音如何快速整合在一个表格内 1.创建Excel表格,要求表格中多个表格内有文字,且文字带有拼音. 2.参照[怎么给Excel表格内文字标注拼音(同一表格内)]这篇经验为表格内文字添加拼音. 3.为了视觉效果最好,在表格中合并一个和B2-F2同宽的单元格,如图所示. 4.选中合并出来的单元格,在如图所示的公示栏输入"=PHONETIC(B2:F2)"公式. 5.输入公式后,将光标定于表格中任一位置,查看到如图的效果. 6.截至到此,我们已经完成了将拼音整合
Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20284: pinyin = "A"
Case -20283 To -19776: pinyin = "B"
Case -19775 To -19219: pinyin = "C"
Case -19218 To -18711: pinyin = "D"
Case -18710 To -18527: pinyin = "E"
Case -18526 To -18240: pinyin = "F"
Case -18239 To -17923: pinyin = "G"
Case -17922 To -17418: pinyin = "H"
Case -17417 To -16475: pinyin = "J"
Case -16474 To -16213: pinyin = "K"
Case -16212 To -15641: pinyin = "L"
Case -15640 To -15166: pinyin = "M"
Case -15165 To -14923: pinyin = "N"
Case -14922 To -14915: pinyin = "O"
Case -14914 To -14631: pinyin = "P"
Case -14630 To -14150: pinyin = "Q"
Case -14149 To -14091: pinyin = "R"
Case -14090 To -13319: pinyin = "S"
Case -13318 To -12839: pinyin = "T"
Case -12838 To -12557: pinyin = "W"
Case -12556 To -11848: pinyin = "X"
Case -11847 To -11056: pinyin = "Y"
Case -11055 To -2050: pinyin = "Z"
Case Else: pinyin = p
End Select
End Function
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & pinyin(Mid(str, i, 1))
Next i
End Function
3.关闭VBE界面，返回Excel，就可以像正常函数一样使用自定义的Getpy函数，来取得文本的拼音缩写了
excel怎么比较两组或两列数据的相同项和不同项
excel怎么比较两组或两列数据的相同项和不同项 本例主要向大家介绍如何快速比较excel中两列数据中的相同数据.不同数据,如果需要,将上述相同或不同数据提取出来. 首先,在C1输入公式 =MATCH(A1,B:B,) 回车后下拉公式,如果返回的是数字,比如说C1的3,就说明A1单元格的内容再B列里第3行存在,也就是B3="A".如果A列的内容再B列里没有就返回错误值#N/A. 如果嫌错误值难看,可以将公式改成: =ISNUMBER(MATCH(A1,B:B,)) ISNUMBER判断
