テキストファイルとマクロ対応のExcelファイルがあります。 Excelファイルは、行ごとにテキストファイルから文字列(アラビア語テキスト)を(vbaを使用して)取得し、それをsheet1セルに配置します。問題は、文字列が正しく表示されていないことです。ランダムな日本語の文字で表示されます。 (私の窓ロケールは日本です)。ここでMS Excel Vbaアラビア語のユニコード
は私のコードです:
Open FilePath For Inputs As #1
Do Until EOF(1)
Line Input #1, textline
ActiveWorkbook.sheets(1).Cell(1,1).Value = textline
'MsgBox(textline)
Loop
Close#1
質問:はどのように私はExcelファイルに貼り付けたときの文字列(アラビア語のテキストは)まだアラビア語であることを得ることができますか?
テキストを取得した後、セルのフォントを** Arial Unicode MS **に設定しようとしましたか? –
はい、私はすでにそれを試みました。アラビア語のテキストをそのままExcelに貼り付けると、正しく表示されます。 – Maguzu
質問を編集し、使用しているVBAコードを追加してください。また、 'MsgBox'文字列をcellに出力する前に' MsgBox'を試して、ダイアログに正しい内容が表示されているかどうかを確認してください。 – omegastripes