|
▼tomomi さん:
一部だけ。。。(中途半端ですみません)
Function TextConv 単体をこちらの環境で走らせてみたところ、
「NumStr」が定義されてない旨のエラーになりました。
そちらで動くということは、どこか別のところで定義されているのかもしれませんが、
おそらく内容がうまく格納されておらず、
> 0.7は消えてしまい。
や
> 〜 0.800.80なります 〜
の原因になっているかと思われます。
また、
> Idx2 = Idx2 + 1
これは、"0.7" と "0.70" という、文字列数の差が1のときは良いですが、
それ以外ではズレの原因となるかと思われます。
Midでの置換において、"0.1966" -> "0.20" = "0.2066"
となります。
つまり、同文字数でなければ、
> TextConv = Left(TextConv, Idx1 + Idx2 - 数字列 - 1) 〜
と同じような処理が必要かと思います。
というように、文字の位置や長さによって複雑化してしまうので
変数を準備し、そこに置換後の文字を入れていく、
という方法を取られた方が無難かもしれません。
参考までに。。。
|
|