システムwiki

Excel365ワークシートから特殊文字を削除する

PA311 解決済 最終更新日:2022-05-26 02:55

こんにちは、

ダウンロードしたファイルは、外部ソースから毎週受け取ります.#、$、%などの特殊文字が含まれています.それらをすべて削除する方法を見つける必要があります.

ファイル、行、列のサイズは異なります.アンダースコアとダッシュが含まれているため、これらを保持する必要があります.ファイル名は受信時に毎週変更される可能性がありますが、名前を変更することはできます.

1回の操作でそれらを削除する方法はありますか?検索番号、すべてを何も置き換えないなど、一連の検索/置換を実行しました.動作しますが、時間がかかる場合があります.

任意の提案をいただければ幸いです.

ポール

返信リスト(回答:2)

1 #
Nothing

再: 「1回の操作でそれらを削除する」

数字は言わないの?

すべてのデータが1つの列にある場合は、大規模な処理を行うことができます = Substitute(Substitute(Substitute(Substitute(...式.

-または-

置換する文字の完全なリストを提供する場合、VBAはシート全体の検索/置換を実行できます.

'


失うものは何もない

2 #
HansVMV 1

次のマクロを適応させて実行できます:

Sub RemoveChars()
薄暗いv
Application.ScreenUpdating= False
'必要に応じて変更
For Each v In Array( "#"、 "$"、 "%")
Cells.Replace What:= v、Replacement:= ""、LookAt:= xlPart
次のv
Application.ScreenUpdating= True
サブの終了

削除する文字を配列に追加します.

マクロをパーソナルマクロワークブックPERSONAL.XLSBに保存すると、必要なときにいつでも実行できます.

見る Excelパーソナルマクロワークブック|すべてのワークブックにマクロを保存して使用する さらに情報が必要な場合.