ASCIIテキストへの変換(Microsoft Excel)
ブレンダには、ワークシートにインポートまたは貼り付けられた多くの情報があります。ワークシートのテキストに「外部」が含まれる場合があります
と奇妙なキャラクター。彼女は、データに非ASCII文字が含まれないようにデータを簡単に変換する方法があるかどうか疑問に思います。おそらく、一部の外国文字は通常のASCII値に変換されます(アクセント付き文字をアクセントなし文字に変換するなど)。
試すことができることがいくつかあります。まず、CLEANワークシート関数を使用して、印刷できない文字を取り除くことができます。この関数を次のように使用するだけです:
=CLEAN(A1)
結果は、印刷不可能なものを含まない「クリーンな」テキストです。外字を通常のASCII文字に置き換えたい場合は、マクロを使用して行う必要があります。比較的簡単なアプローチの例を次に示します。
Sub StripAccent() Dim sAcc As String Dim sReg As String Dim sA As String Dim sR As String Dim i As Integer sAcc = "������������������������������������������������������������" sReg = "SZszYAAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy" For i = 1 To Len(sAcc) sA = Mid(sAcc, i, 1) sR = Mid(sReg, i, 1) Selection.Replace What:=sA, Replacement:=sR, _ LookAt:=xlPart, MatchCase:=True Next End Sub
マクロは、sAcc変数内の文字をステップスルーし、一度に1つずつ、検索と置換を使用して、それらをsReg変数内の対応する文字に置き換えます。変換のニーズを反映するようにsAccとsRegの内容を調整できます。重要なのは、両方が同じ長さであることを確認することです。
注:
このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
link:/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]
。
_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。
このヒント(11492)は、Microsoft Excel 97、2000、2002、および2003に適用されます。
Excel(Excel 2007以降)のリボンインターフェイスに関するこのヒントのバージョンは、次の場所にあります:
link:/ excelribbon-Converting_to_ASCII_Text [ASCIIテキストへの変換]
。