WIN XP HOME,EXCEL2002を使用しています。
あるWEBサイトから取り込んだデータに「やまだ たろう」とあります。この「やまだ」と「たろう」の間に、(実際にはスペースのように見えます)というデータが入っており、最終的にEXCEL VBAでCSVファイルに変換すると「やまだ?たろう」となってしまいます。
この「?」を無くして「やまだたろう」(間にスペースは不要)としたいのですが、どのようにすればいいのでしょうか?
ちなみに↓の"a"のところに半角スペースや、全角スペースなどを入れてみましたが、NGでした。
Cells.Replace What:="a", Replacement:="",
どなたかよろしくお願いいたします。
No.6ベストアンサー
- 回答日時:
webからコピーしたものを一度メモ帳などに
貼り付けて保存。そのファイルをEXCELで開くってのは
どうでしょう?
余談
文字列はアスキーコードで保存されます
例
1 → &h31
や → &h82E2 (もしかしたら &hE282)
? → &h3F
半角SP → &h20
となっています。(&hは16進数)
やまだ?たろう の?部分が何かわかれば、
変更できます。
そのへんはバイナリ-エディタを使用して調べてみてください。
この回答への補足
momoturboさん、
先週は何度もお付き合いいただき、本当にありがとうございました。しばらく時間が空いてしまってすみません。
現在の状況を先にいいますCSVに変換後でしたら以下の方法で消すことができました。
Cells.Select
Selection.Replace What:="~?", Replacement:=""
エクセル上で「?」はワイルドカードになっているので「?」だけを消したい場合はその前に「~」が必要とのことでした。
でも、私が本当にやりたいのはCSVに変換する前にスペース(らしきもの)を消したいんです。
このスペース(らしきもの)をエクセルの関数で=code("")というのを使うと以下のことが分かりました。
=code("半角スペース")の値は「32」です。→&H20ですね?
=code("?")の値は「63」です。→&H3Fですね?
=code("私が消したいスペース")の値は「160」となります。→これはなにになるのでしょう?
これは分かればmomoturboさんから教えてもらった以下の方法できっと消せますよね。
Cells(1, 1).Replace Chr(&xxx), ""
お分かりになれば教えてくれだい。いろいろ調べたのですが、自力では分かりませんでした。よろしくお願いします。
No.4
- 回答日時:
Cells(1, 1).Replace Chr(&H20) & Chr(&H3F) & Chr(&H20), ""
' ' は &h20 &h3f &h20 で表示されているみたい
多分これでいけると・・・(^ ^;
この回答への補足
なんどもお付き合いいただき、本当にありがとうございます。
早速、教えていただいたコードを先ほどと同じやり方で試させていただいたのですが、やはりCSVに変換すると「?」が残ってしまいました。
今のところお手上げ状態ですが、自分なりにもう少し調べてみたいと思います。
No.3
- 回答日時:
1.EXCELのA1のセルに「やまだたろう」を貼り付ける(は実際には見えません)。
自分の場合
やまだ・たろう
というように黒点が間に表示されます
2.Cells(1, 1).Replace Chr(&HA0), "" を実行。
EXCEL上は黒点が消えます
そのセルをコピーペーストしても黒点がなし
3.テキストファイルに保存する。
どのようにして保存しているのでしょう?
バイナリーエディターなどではたして'?'が''か
どうか調べてみてはどうでしょう?
環境
WIN2k office2000
参考URL:http://computers.yahoo.co.jp/download/vector/win …
この回答への補足
何度もありがとうございます。
>3.テキストファイルに保存する。
>どのようにして保存しているのでしょう?
保存はエクセルのファイルメニューから「名前をつけて保存」→ファイルの種類で「CSV(カンマ区切り)」を選んで保存しました。
私の場合はあるWEBページで表示された画面をコピーしてそのままエクセルに貼り付けていますので・にはならずスペースのように表示されています。なぜなのかというとここの質問文に該当部分をそのまま貼り付けるとやまだたろうと表示された為です。
教えていただいたバイナリーエディターはいくつかダウンロードしてやってみましたが、あまり知識もなく、使ったこともないのでまだ良く分かっていない状況です。もう少しがんばってみます。
No.2
- 回答日時:
Cells(1, 1).Replace Chr(&HA0), ""
これでやってみてください。
この回答への補足
ご回答ありがとうござました。
うーん、やっぱりうまく行きませんでした。
試した方法は・・・・・
1.EXCELのA1のセルに「やまだたろう」を貼り付ける(は実際には見えません)。
2.Cells(1, 1).Replace Chr(&HA0), "" を実行。
3.テキストファイルに保存する。
するとテキストファイルには「やまだ」と「たろう」の間に「?」マークが出てしまいます。
この「?」を消したいのですが・・・・
試した方法に何か間違いはありますか?もしよろしければ再度アドバイスをいただけると助かります。
No.1
- 回答日時:
こんにちは
は
と同じですので、
U+00A0
です。
(参考URLをご確認ください。)
Cells.Replace What:=0x00A0, Replacement:="",
でいかがでしょうか?
参考URL:http://www.w3.org/TR/REC-html40/sgml/entities.html
この回答への補足
ご回答ありがとうございます。
教えていただいたものを試してみたのですが、うまくスペースを詰めてくれません。教えていただいた通りにやっているつもりですが、何か他に気をつけなければいけないところはあるでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 指定列最終行までのスペースを改行するVBAについて 2 2022/06/01 19:50
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Visual Basic(VBA) Excel vba で1と10を正確に判断させる方法を教えてください。 TからU列に1と入力があれば 3 2022/12/26 16:54
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- Excel(エクセル) 【VBA】ファイルパスに半角スペースが入ると、VBAが動かない 5 2022/08/04 20:52
- Excel(エクセル) エクセルでのデータの統一に関して リストを作成する際、元データをコピペでリストに転記しており、元デー 2 2022/08/31 15:33
- Excel(エクセル) 【マクロ】フォルダAからダBへファイルを、ファイルの更新日時の条件で、1つづつ移動するには? 3 2022/08/25 09:56
- WordPress(ワードプレス) ワードプレスで、左寄せ画像と文字を横並びにせず、画像の下に文字を表示される方法を教えてください 1 2022/04/24 11:06
- その他(Microsoft Office) 英数字のみ全角から半角に変換 4 2023/07/28 14:48
- PostgreSQL ポストグレにあるExcelファイルを開くには 1 2022/12/13 18:07
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
FileSearchが使えなくなり困っ...
-
Excel VBAで作成したマクロをxl...
-
VBAでPDF作成をしたあと、指定...
-
エクセル:マクロ:保存時に連...
-
Excel VBAでほかのアプリケーシ...
-
VBAで、強制保存してブックを閉...
-
読み取り専用ファイルを上書き...
-
VBScriptで日本語が変です
-
ファイルのダウンロード保存先...
-
コマンドプロンプトでデスクト...
-
エクセルでファイルの最終更新...
-
VB.NETでEXCELファイルを開き、...
-
onedriveで同期解除をしたら、...
-
vlan internal allocation poli...
-
WindowsからSSHでサーバーにあ...
-
TXTファイルを上書き保存する前...
-
Word・Excelの「Ctrl+Y」につい...
-
沢山のフォルダにあるファイル...
-
ファイルを閉じるコマンドを教...
-
YAHAMA RTXシリーズのコマンド...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
読み取り専用ファイルを上書き...
-
Excel VBAでほかのアプリケーシ...
-
コマンドプロンプトでデスクト...
-
Excel VBAで作成したマクロをxl...
-
vbaでIEの名前を付けて保存(A)...
-
エクセルVBAについて
-
VBAで、強制保存してブックを閉...
-
ExcelVBAでデスクトップのPATH...
-
エクセルで「名前を付けて保存...
-
VBA メモ帳の上書き保存がしたい
-
VBScriptで日本語が変です
-
タイトルバーやメニューバーの...
-
Pivot table で集計されたデー...
-
エクセルマクロ PDF出力、CSV出力
-
VBSでHPを保存するにはど...
-
AccessVBAでレポートをPDFで出力
-
htmlから取り込んだ を消...
-
ASPでファイルを保存するダイア...
-
VBScriptでのSaveAsについて
-
CFileDialogで保存したい
おすすめ情報