中文怎麼快速轉成拼音呢?Excel快速提取中文首字母

2020-12-19 微科技智生活

用Excel收集統計個人信息時，會遇見各種各樣的問題。例如：我們需要將中文姓名轉換成首字母拼音的形式，這時候該怎麼操作呢？

你還在一個一個的輸入嗎？這樣太麻煩了，接下來讓我們使用VBA，快速將中文轉換成拼音首字母的形式，簡單便捷，快來試試吧！

打開Microsoft Excel工作簿，如果Excel文件後綴名是「xlsx」，請先將Excel文檔另存為「xls」或者「xlsm」類型。

右鍵單擊Sheet1工作表，選中右鍵菜單中的查看代碼。

在Microsoft Visual Basic for Applications窗口中，右鍵單擊工程資源管理器窗口中的空白位置，將滑鼠指針移動至插入，選中模塊。

接著將以下代碼複製粘貼至模塊1的代碼窗口中，點擊保存後退出Visual Basic編輯器。

代碼區域

Function Getpychar(char)

temp = 65536 + Asc(char)

If (temp >= 45217 And temp <= 45252) Then

Getpychar = "A"

ElseIf (temp >= 45253 And temp <= 45760) Then

Getpychar = "B"

ElseIf (temp >= 45761 And temp <= 46317) Then

Getpychar = "C"

ElseIf (temp >= 46318 And temp <= 46825) Then

Getpychar = "D"

ElseIf (temp >= 46826 And temp <= 47009) Then

Getpychar = "E"

ElseIf (temp >= 47010 And temp <= 47296) Then

Getpychar = "F"

ElseIf (temp >= 47297 And temp <= 47613) Then

Getpychar = "G"

ElseIf (temp >= 47614 And temp <= 48118) Then

Getpychar = "H"

ElseIf (temp >= 48119 And temp <= 49061) Then

Getpychar = "J"

ElseIf (temp >= 49062 And temp <= 49323) Then

Getpychar = "K"

ElseIf (temp >= 49324 And temp <= 49895) Then

Getpychar = "L"

ElseIf (temp >= 49896 And temp <= 50370) Then

Getpychar = "M"

ElseIf (temp >= 50371 And temp <= 50613) Then

Getpychar = "N"

ElseIf (temp >= 50614 And temp <= 50621) Then

Getpychar = "O"

ElseIf (temp >= 50622 And temp <= 50905) Then

Getpychar = "P"

ElseIf (temp >= 50906 And temp <= 51386) Then

Getpychar = "Q"

ElseIf (temp >= 51387 And temp <= 51445) Then

Getpychar = "R"

ElseIf (temp >= 51446 And temp <= 52217) Then

Getpychar = "S"

ElseIf (temp >= 52218 And temp <= 52697) Then

Getpychar = "T"

ElseIf (temp >= 52698 And temp <= 52979) Then

Getpychar = "W"

ElseIf (temp >= 52980 And temp <= 53640) Then

Getpychar = "X"

ElseIf (temp >= 53689 And temp <= 54480) Then

Getpychar = "Y"

ElseIf (temp >= 54481 And temp <= 62289) Then

Getpychar = "Z"

Else

Getpychar = char

End If

End Function

Function Getpy(str)

For a = 1 To Len(str)

Getpy = Getpy & Getpychar(Mid(str, a, 1))

Next a

End Function

例如單元格區域C:C是中文姓名，需要在單元格區域D:D轉換成拼音首字母形式。只需在D2單元格中輸入函數「=Getpy(C2)」，然後進行單元格填充就可以啦。

是不是非常簡單便捷呢？抓緊時間把代碼收藏起來吧，有備無患。

點擊關注、轉發和收藏，有更多計算機小技巧等著您來發現。

相關焦點

  • 大部分人都不知道的excel小技巧,快速將中文漢字轉換成拼音
    我們在日常工作中，經常會使用到excel處理和分析各種各樣的數據，不過excel表裡有時候也有中文漢字，這次我們就一起來學習一下中文漢字轉換成拼音的技巧。快速將中文漢字轉換成拼音我們以實例來講解，第一列是中文漢字，第二列是帶有拼音的中文漢字，第三列是只有拼音，這是怎麼做到的呢
  • excel查找函數應用:如何提取姓名的拼音首字母
    如果此刻讓你快速提取漢字拼音的首字母，你會怎麼做呢？相信大多數小夥伴面對這個問題時，都會蒙圈，可能會想「這應該得用VBA解決吧，函數應該不行吧。」其實呀，這個問題用大家都會的VLOOKUP函數就能搞定，趕緊來看看吧！在某些特殊的情況下，我們可能需要用到拼音首字母。
  • Excel怎麼快速提取混合單元格中的中文、英文、數字?
    Microsoft Excel快速提取混合單元格中的中文、英文、數字，雖然這個Microsoft Excel技巧聽起來很「高大上」，但是在實際辦公中很少會遇到中文、英文、數字「混合三打」的情況。俗話說得好，行走江湖技多不壓身，多一門技術，多一門吃飯的寶貝。廢話說的有些多了，接下來就直奔主題吧！
  • 「中文拼音」英語應該怎麼表達?
    可能大家從小學習英語都是接觸單詞比較多，英語書後面的單詞表也更加多地喜歡用Vocabulary或者Word來表示，很多小夥伴就會以為中文的漢字也能翻譯成這樣，其實「漢字」的翻譯應該是：1.Chinese character 中文漢字
  • 中文比英文更適合快速閱讀
    漢字是象形文字，其顯著的特點是字形和字義的聯繫非常密切，具有明顯的直觀性和表意性，這種直觀達意的特點使中文比英文更適合快速閱讀。漢字的表意性使漢字成為世界上惟一能跨越時空的文字。現代的快速閱讀法，首先是在歐美國家產生和發展起來的，他們的文字有一個共同特徵--都是表音的拼音文字，單個字母沒有任何意義，只有若干個字母組合起來才構成單詞。這樣在閱讀時，由於符合認知心理學的組塊原則．所以有利於快速閱讀的進行。而我們的文字卻是與拼音文字截然不同的表意文字。那麼，漢語和漢字構成的閱讀材料能不能進行快速閱讀呢？
  • Excel單元格英文大小寫和句首字母大小寫怎麼轉換?
    在工作中，我們有時需要將一些英文數據轉換為大寫或者小寫，一個一個修改可就太費事兒了，那有什麼辦法能快速進行轉換嗎？其實很簡單，一個公式就能輕鬆搞定！單詞首字母轉換為大寫將每個英文單詞的首字母轉換為大寫，Excel非常公平地為大家準備了一個函數—PROPER，公式同上。
  • 如何快速將阿拉伯數字轉化為中文數字?excel表格輕鬆搞定!
    在工作中，有時候會遇到把阿拉伯數字轉轉換為中文簡體，中文繁體，如果數據很多，而且一時找不到轉換的軟體，試試電腦上的excel吧，一個函數即可搞定。方法一：單元格格式。如下圖所示，按ctrl+1打開設置單元格格式對話框，選擇特殊中的中文小寫數字和中文大寫數字即可把阿拉伯數字轉化為中文簡體字符和中文繁體字符。但是請注意編輯欄，轉化完之後單元格裡的內容實質還是阿拉伯數字，只是顯示效果為中文小寫或者大寫。這種轉換結果是不能把轉換後的文字複製到word表格、微信聊天窗口等。如果想要把單元格裡的「實質」內容也變成中文大小寫，就需要用到函數了。
  • 老外學中文 拼音教學的四個小技巧
    老外學中文拼音教學的四個小技巧拼音是老外學中文的基礎，對於學習漢字，練習口語尤為重要。為了讓學生在短時間內掌握拼音，小編總結了以下四個教學技巧，望各位老師採納。找相似，讓拼音入門更輕鬆將漢語拼音裡的聲母和韻母的讀音與英語字母的讀音相比較，找出它們的共同點，幫助學生理解和記憶。對於中文零基礎的學生來說，有些讀音很容易與英語字母發音混淆，如果能將拼音與英語字母讀音配上對，就會讓拼音學習一下子變得容易起來。
  • 中文羅馬字母拼寫修訂新國標 規範漢語拼音使用
    中文羅馬字母拼寫修訂新國標 規範漢語拼音使用 2016年05月06日 09:35　來源：光明日報
  • 如何快速讓孩子學好漢語拼音字母
    眾所周知，拼音是學好漢語的重要基礎。就像蓋高樓打好的地基，如果拼音學不好，基礎打不牢固，那以後語文就基本不用學了。那怎樣才能快速的學好漢語拼音呢？今天我們就來探討一下。這是學好拼音的第一步，首先我們要讓孩子認識這些拼音，多讀拼音加深孩子的理解能力，學拼音不能急於求成，剛學拼音的孩子們理解能力較差，學不會很正常，家長要耐心引導，更不能拔苗助長，可以陪孩子每天讀三到五遍，也可以跟孩子一起看一些關於學拼音的動畫，讓孩子對拼音有一定的了解之後我們就可以進行下一步了。二、多寫。
  • 會計福利,用Excel把數字快速變成中文大寫數字
    我們在使用Excel製作工資表或者其他文件的時候，經常可以用到數字的中文大寫，你不會還一個一個的在Excel表格裡打「壹貳叄肆伍陸柒」吧？那你就OUT了。今天教你一個辦法，讓阿拉伯數字快速變成中文的壹貳叄。
  • 文字添加上拼音並分離使用?word和excel配合使用發揮作用
    今天，我就和大家來交流關於在word中如何給文字添加上拼音，而且將它們提取並分別存放的技巧，整個操作過程還需要word和excel配合使用，看似挺複雜，其實一旦掌握後，就變得很簡單了。一起來看看吧！該操作比較簡單，因為word軟體就自帶有添加拼音的功能。具體操作方法是，選中全部選中文本內容，然後依次點擊開始選項卡的字體標籤，選擇拼音指南按鈕即可，具體見下圖。經過此項操作以後，原文檔的文字上方就出現了對應的拼音標註。如下圖。
  • Excel怎麼快速製作拼音田字格?快速製作,批量列印
    練字是學校教學一直強調的重點之一，怎麼製作拼音田字格供學生使用呢？用我們最熟悉的Excel就可以輕鬆製作拼音田字格並快速列印。第一步全選單元格後，右鍵單擊任意一列，點擊右鍵菜單中的列寬。重點是單元格的縱向填充需要注意，否則拼音單元格的高度無法複製。點擊關注、轉發和收藏，有更多計算機小技巧等著您來發現。
  • Excel表格中的數字如何快速變成中文大寫數字?
    如果碰到需要將表格中的數字變成中文大寫數字的時候，應該如何操作才能快速實現呢？這個功能較常見用會計，如果您對該功能感興趣的話，不妨看看下文。打開Excel表格，選擇表格中的需要處理的數字區域，如圖所示，然後右鍵單擊選區，在彈出的菜單中選擇設置單元格格式命令。
  • 圖片轉文字識別軟體推薦?快速識別文字軟體哪款好
    圖片轉文字識別軟體推薦？生活中，我們有太多的時候需要對圖片進行文字識別、轉換操作了。迅捷文字識別軟體是一款圖片轉文字、ocr拍照取字與翻譯軟體，通過它使用手機就可以實現拍圖識字、照片掃描等操作。下面，我們一起來看看這款快速識別文字軟體好用在哪幾個方面吧。
  • 漢語拼音是怎麼形成的,為什麼和英文字母那麼像?
    例如「蠱」注「古」，「胥」注「需」，同音字怎麼讀，這個字也怎麼讀。需要注意的是，這裡的直音和我們學習古文時遇到的「通假字」是不一樣的，通假字的重點在於「假」，即原文中使用的漢字是錯別字，後人出於對作者的尊重，而不予改正，而是將正確的字在後面做上備註。直音字雖然用起來方便，可萬一用來注音的字人們也不認識怎麼辦？
  • excel如何把阿拉伯數字轉換成中文大寫
    我們在日常辦公中使用excel表格，會遇到希望顯示在表格上的數字是中文大寫的形式，特別是會計工作人員，那麼怎樣用excel實現這一功能呢在excel表格中選中需要轉換的阿拉伯數字所在的單元格，按住Ctrl +1,會彈出設置單元格對話框。
  • 漢語拼音新規將實施 拼音中文名須姓在前名在後
    10月1日起實施的新版《漢語拼音正詞法基本規則》規定　　拼音中文名須姓在前名在後　　本報訊 （記者 王蔚）經國家質量監督檢驗檢疫總局、國家標準化管理委員會批准，新修訂的《漢語拼音正詞法基本規則》將於今年10月1日起實施。
  • PDF文檔翻譯神器,英文文獻一鍵翻譯成中文!
    那麼，怎麼把英文pdf翻譯成中文？英文文獻翻譯軟體哪個更好用呢？下面我們就來分享一下英文pdf翻譯成中文的方法。在自身英語水平不足的情況下，我們還是藉助翻譯工具來實現快速將英文pdf翻譯成中文，節約時間。當然啦，由於是學術性的文獻，對翻譯的準確度和專業性要求會比較高，而我們今天使用的這個翻譯工具——翻譯狗，就可以滿足需求。
  • 中文拉丁化的嘗試——威陀瑪拼音、郵政式拼音、拉丁化新文字
    拉丁化又稱羅馬化，就是把一個語言音譯或轉錄成羅馬字母的過程。在大家初學日語歌的時候，都搜到過日語的羅馬字吧，它就是日語的羅馬化。你可以百分之百地憑藉羅馬字去重組成日語的假名音節。大家遇到在英語課本上都見過Kim這個人吧，長著一幅亞洲面孔，翻譯成「金」，這就是佔韓國人口20%的金姓。你猜得沒錯，Kim就是韓語的羅馬化。