国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

有時我們需要在Excel中將單元格中所包含的英文和中文分離出來，讓分離出的中文和英文分別放到其他單元格中。如圖：

假如A2單元格中包含中英文混合內(nèi)容，可以用下面的方法來進行分離：

    1.使用用公式：

    在B2單元格中輸入數(shù)組公式：

    =MID(A2,MATCH(2,LENB(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)),0),LENB(A2)-LEN(A2))

    公式輸入完畢后按Ctrl+Shift+Enter結(jié)束。

    在C2單元格中輸入公式：

    =TRIM(SUBSTITUTE(A2,B2,""))

    2.使用自定義函數(shù)：

    還可以在VBA中自定義一個函數(shù)，然后在Excel表格中使用該函數(shù)進行分離。方法是：按Alt+F11，打開VBA編輯器，單擊菜單“插入→模塊”，在右側(cè)的代碼窗口中輸入下列代碼：

    Function SplitStringChs(TheString)
      Dim n, Chs
      For n = 1 To Len(TheString)
        If Asc(Mid(TheString, n, 1)) < 0 Then
          Chs = Chs & Mid(TheString, n, 1)
        End If
      Next
      SplitStringChs = Chs
    End Function

    Function SplitStringEng(TheString)
    Dim n, Eng
    For n = 1 To Len(TheString)
      If Asc(Mid(TheString, n, 1)) >= 0 Then
        Eng = Eng & Mid(TheString, n, 1)
      End If
    Next
    SplitStringEng = Trim(Eng)
    End Function

    關(guān)閉VBA編輯器，在B2單元格中輸入公式：

    =SplitStringChs(A2)

    在C2單元格中輸入公式：