VBAで文字コード変換

Excelのシートの内容を読み込んで、別のテキストファイルに、SJIS(Shift JIS)以外の文字コードで出力するVBAサブルーチン
http://nagblog.blog24.fc2.com/blog-entry-50.html
文字コードを変換する関数・・・動作確認済
http://pub.ne.jp/arihagne/?entry_id=2214821