Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


43341 / 76735 ←次へ | 前へ→

【38444】Re:漢字をSJIS(16進)に変換したい
回答  Blue  - 06/6/3(土) 2:16 -

引用なし
パスワード
   よくわからないけど、16進という文字列がほしいのか値がほしいのかどちらでしょうか?

値がほしいのであれば、WindowsであればStrConvでできます。

Dim mbcs() As Byte
Dim s   As String
Dim i   As Long

s = "亜伊宇あいうアイウABC"
mbcs = StrConv(s, vbFromUnicode)
For i = LBound(mbcs) To UBound(mbcs)
  Debug.Print i + 1 & "バイト目 : " & Hex(mbcs(i))
Next
0 hits

【38443】漢字をSJIS(16進)に変換したい もうだめぽ 06/6/3(土) 2:00 質問
【38444】Re:漢字をSJIS(16進)に変換したい Blue 06/6/3(土) 2:16 回答
【38478】Re:漢字をSJIS(16進)に変換したい もうだめぽ 06/6/3(土) 22:30 お礼

43341 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free