- 博客(1)
- 资源 (2)
- 收藏
- 关注
原创 EXCEL姓名转换为拼音缩写
打开office Excel,Alt+F11打开VBA界面。在工程 project处右键插入模块,复制以下代码。Function pinyin(p As String) As Stringi = Asc§Select Case iCase -20319 To -20284: pinyin = “A”Case -20283 To -19776: pinyin = “B”Case -19775 To -19219: pinyin = “C”Case -19218 To -18711: pinyin
2020-08-20 10:26:53
4218
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人
RSS订阅