Excel VBA質問スレ Part7

708 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 19:37:01 ] 春日部市１-２-３のような文字列の数字部分のみ半角に変換する方法を探していたら 次のようなマクロを見つけました。 Sub MacroR() Dim idx As Integer, trg As Range 　Set trg = ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, xlTextValues) 　For idx = 0 To 9 　　trg.Replace What:=Right(StrConv(Str(idx), vbWide), 1), Replacement:=Right(Str(idx), 1) 　Next End Sub ここでRight関数を使っているのは、Str関数だと先頭に符号が付くからですか？ これのReplaceの部分を 　　trg.Replace What:=StrConv(CStr(idx), vbWide), Replacement:=idx に変更すると同じ事が出来たのですが、これだと何か不都合が出たりしますか？

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef