|
▼ichinose さん:
ichinose様、わざわざ調べて頂きありがとうございました。
とても勉強になりました。
また、ポイントが「LookAt:=xlPart と matchbyte:=False」など
思いもよりませんでした。ありがとうございます。
もっと勉強しなければいけませんでした。すみません。
>こんばんは。
>" "で出来ないと思い込んでました。
>結果、chr(&h20)で作動したのできちんと調べずに投稿してしまいました。
>
>
>Sub Test()
> With Selection
> .Replace What:=" ", Replacement:="", LookAt:=xlPart, _
> SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
> ReplaceFormat:=False, matchbyte:=False
> End With
>End Sub
>
>↑これでも正常に作動します。
>因みに chr(&h20)は、" "をコードから取得したものです。
>つまり、同じものです。
>
>msgbox " "=chr(&h20)
>
>は、Trueとなります。
>
>ポイントは、LookAt:=xlPart と matchbyte:=False です。
>
>これらは、 Help等で調べてみてください。
|
|