KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

Excel ASC 函數

作者Zhoumandy修改日期

ASC 函數會傳回字串首個字元的 ASCII 碼值,主要用於 Excel 的 VBA 環境中。

asc-function 1


語法

=ASC()text)


引數

  • 文字(必填):您要轉換為 ASCII 碼值的文字,或包含該文字的儲存格參照。

返回值

ASC 函數會傳回一個數值


函數注意事項

  1. 提供給 VBA 中 ASC 函數的字串可為任意有效字串,但僅會計算該字串的第一個字元。
  2. ASC 函數區分大小寫。
  3. ASC 函數所傳回的 ASCII odes 值為介於 0 到 255 之間的十進位整數,如下方截圖所示。如需更多關於 ASCII 碼值的詳細資訊,請參閱此文章:https://www.ascii-code.com/。
    asc-function 2
  4. 在 VBA 中,ASC 函數針對 A-Z 傳回的 ASCII 碼值為 65 至 90,而針對 a-z 則為 97 至 122.

範例

在此情況下,下表中包含一些測試字串。若要計算這些文字字串的 ASCII 碼值,請依下列步驟操作:

1. 按下 Alt + F11 鍵,即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中,請點選「插入」>「模組」以開啟模組視窗,然後將下方的 VBA 程式碼複製並貼上至該視窗中。

VBA:計算 ASCII 碼值

Sub Code()
Dim Result1
Result1 = Asc("K")
MsgBox Result1
End Sub

asc-function 3

3. 按下 F5 鍵執行程式碼,隨即會彈出一個 Microsoft Excel 對話方塊,顯示文字「K」的 ASCII 碼為 75.

asc-function 4

4. 將結果「75」輸入儲存格 D5,以記錄該結果。

asc-function 5

5. 若要取得其他結果,我們需相應調整 VBA 中 ASC 函數的文字。例如,若想獲取文字「Kutools」的 ASCII 碼,可使用以下 VBA 程式碼:

VBA:計算 ASCII 碼值

Sub Code()
Dim Result2
Result2 = Asc("Kutools")
MsgBox Result2
End Sub

asc-function 6

您會發現「Kutools」的搜尋結果與「K」完全相同。

6. 重複上述步驟,即可取得其餘結果。

asc-function 7

注意事項:

  1. 若提供的字串為空白,將會引發執行階段錯誤。

    asc-function 8

  2. 若提供的文字為空格,則會傳回 32.

    asc-function 9

  3. 由於 ASC 函數區分大小寫,因此對相同字元的不同大小寫會傳回不同結果;例如,字元 E 與 e 會分別傳回 69 與 101.

相關函數:

  • Excel 函數 EVEN
    EVEN 函數會將數字朝遠離零的方向捨入至最接近的偶數整數。