Excel VBA質問箱 IV

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

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


4768 / 76732 ←次へ | 前へ→

【77580】Re:innertextの特殊文字によるsplit
発言  γ  - 15/10/26(月) 22:39 -

引用なし
パスワード
   ご存じと思いますが、読者に向けて、
結果だけでなく調べ方をメモしておきます。

innertextをシート上のセルに書き出してください。
そして、"≫"がセルの先頭に来るように頭を削ってください。

Sub test4()
  Debug.Print AscW(Range("A1").Value)
End Sub  
とすると、最初の文字"≫"の Unicode文字コードを返します。
(Asc関数のヘルプを参照)
この場合、187になります。

----------

逆に文字コードを与えて、文字を得るには、
ChrW関数を使います。(Chr関数のヘルプを参照)

  a = Split(s, ChrW(187))
のように使います。
ChrW(&HBB)は 16進数表記で、内容は同じ。


VBEはユニコード未対応ですから、ユニコード文字をコード中に書くことは
できません。
つまり、  a = Split(s, "≫") とはできません。

したがって、ChrWを使って、
  a = Split(s, ChrW(187))
とせざるを得ません。

# なお、表記上 "≫"を流用しましたが、実際は別の文字です。
2 hits

【77577】innertextの特殊文字によるsplit Satsuki 15/10/26(月) 19:29 質問[未読]
【77578】Re:innertextの特殊文字によるsplit γ 15/10/26(月) 21:09 発言[未読]
【77579】Re:innertextの特殊文字によるsplit Satsuki 15/10/26(月) 22:25 お礼[未読]
【77580】Re:innertextの特殊文字によるsplit γ 15/10/26(月) 22:39 発言[未読]

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