Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

65171 / 76734

←次へ　｜　前へ→


	【16138】Re:全角ダブルコーテーションを取り除く処理

かみちゃん - 04/7/17(土) 11:01 -


	引用なし

	パスワード

こんちには。かみちゃん　です。

>たとえば、フォーム上のテキストボックス(Textbox1)に文字を入力して、登録ボタンを押すと文字列がセルに転送されるとします。転送の際、Replace関数で文字列内の不要な区切り記号を取り除きたいのです。このときに、全角のダブルコーテーションを指定するとエラーになってしまいます。
>Replace(Textbox1.Text, "”", "")　

全角ダブルクォーテーションは2つありますが、自動的に半角に変換されてしまうようなので、私は「“」はChr$(&H8167)で、「”」はChr$(&H8168)で取得するようにしています。

今回の場合は、
Replace(Textbox1.Text, Chr$(&H8168), "")
でいかがでしょうか？
WindowsXP、Excel2002で確認済みです。

2 hits

▼

【16136】全角ダブルコーテーションを取り除く処理 miyake 04/7/17(土) 10:43