vbaでメール。その3 メールファイル(.emlファイル)の文字コード | 15g.jp

jisです。shift-jisではなく、jisという文字コードがあります。

vbaから使う場合はこちらの記事を参考に、CDOで処理することを強くおすすめします。

テキストとして処理しようとするととんでもなく大変です。