[PR]
2024年12月04日
×
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
正確な文字数
2009年06月08日
VBAで正確に文字数を取得するのは、下記の通り
Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), start, length), vbUnicode)
End Function
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), start, length), vbUnicode)
End Function
一部正確に出せないのがあった様な気がしたけど、思い出せないです。
[0回]
PR