在Excel中如何獲取漢字拼音首字母
材料/工具
Excel
方法
打開Excel
按“Alt+F11"組合鍵,彈出“Visual Basic編輯器”。
點擊菜單欄的“插入”選項,然後點擊下拉列表裏的“模板”。
在彈出的窗口中複製粘貼下面的代碼:
Function getpychar(char)
tmp = 65536 + Asc(char)
If (tmp >= 45217 And tmp <= 45252) Then
getpychar = "A"
ElseIf (tmp >= 45253 And tmp <= 45760) Then
getpychar = "B"
ElseIf (tmp >= 45761 And tmp <= 46317) Then
getpychar = "C"
ElseIf (tmp >= 46318 And tmp <= 46825) Then
getpychar = "D"
ElseIf (tmp >= 46826 And tmp <= 47009) Then
getpychar = "E"
ElseIf (tmp >= 47010 And tmp <= 47296) Then
getpychar = "F"
ElseIf (tmp >= 47297 And tmp <= 47613) Then
getpychar = "G"
ElseIf (tmp >= 47614 And tmp <= 48118) Then
getpychar = "H"
ElseIf (tmp >= 48119 And tmp <= 49061) Then
getpychar = "J"
ElseIf (tmp >= 49062 And tmp <= 49323) Then
getpychar = "K"
ElseIf (tmp >= 49324 And tmp <= 49895) Then
getpychar = "L"
ElseIf (tmp >= 49896 And tmp <= 50370) Then
getpychar = "M"
ElseIf (tmp >= 50371 And tmp <= 50613) Then
getpychar = "N"
ElseIf (tmp >= 50614 And tmp <= 50621) Then
getpychar = "O"
ElseIf (tmp >= 50622 And tmp <= 50905) Then
getpychar = "P"
ElseIf (tmp >= 50906 And tmp <= 51386) Then
getpychar = "Q"
ElseIf (tmp >= 51387 And tmp <= 51445) Then
getpychar = "R"
ElseIf (tmp >= 51446 And tmp <= 52217) Then
getpychar = "S"
ElseIf (tmp >= 52218 And tmp <= 52697) Then
getpychar = "T"
ElseIf (tmp >= 52698 And tmp <= 52979) Then
getpychar = "W"
ElseIf (tmp >= 52980 And tmp <= 53640) Then
getpychar = "X"
ElseIf (tmp >= 53679 And tmp <= 54480) Then
getpychar = "Y"
ElseIf (tmp >= 54481 And tmp <= 62289) Then
getpychar = "Z"
Else '如果不是中文,則不處理
getpychar = char
End If
End Function
'逐個取ASC碼
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & getpychar(Mid(str, i, 1))
Next i
End Function
然後依次關閉Visual Basic編輯窗口,返回Excel
選中B2單元格,輸入公式“=getpy(A1)",然後按回車鍵。
鼠標移到B2單元格右下角,下拉填充公式即可完成所有。
-
微博怎麼顯示手機型號,微博如何顯示手機型號
微博怎麼顯示手機型號:1、首先需要點擊手機桌面中的微博。2、然後再點擊屏幕右下方的我的。3、然後再點擊屏幕上方的設置圖標。4、然後再點擊會員專屬設置。5、然後再點擊微博來源。6、最後選擇想要顯示的手機型號就可以了。...
-
信用卡的錢怎麼轉到微信,信用卡的錢轉到微信方法
1、信用卡需要先辦理現金轉出業務,先將額度轉賬到銀行卡里,再通過銀行卡充值的方法來轉到微信錢包中。因此,信用卡無法直接將額度轉賬到微信裏,中間必須通過銀行卡纔可以完成。信用卡綁定在微信中只可以用於消費,轉賬、發紅包都是不支持的。2、另外,信用卡綁定了微信...
-
載人火箭頂部有一個尖頂叫什麼塔
1、載人火箭頂部有一個尖頂叫逃逸塔,又名逃生塔,裝在飛船頂端,從遠處看像是火箭上的避雷針,與一般火箭圓錐形的頭部很不相同。2、由塔架、逃逸發動機和分離發動機(均爲固體火箭發動機)組成,發生緊急情況時,逃逸發動機迅速點火,使航天員座艙(返回艙)與固體火箭分離,迅速脫離...
-
蘋果手機怎麼縮圖
智能手機的拍照功能越來越好,拍出來的圖片也越來越清晰,用手機來記錄生活中的點滴已成爲了人們的日常習慣,而平時也會用手機對圖片進行一些簡單的處理,那麼,蘋果手機要怎麼縮小圖片尺寸呢?蘋果手機圖片尺寸可以通過郵件來進行調整。打開蘋果手機,在相冊中選擇需要調整...