手順1)文字化けした部分だけをドラッグで選択してCtrl+C(Ctrlを押しながらCキーを押す。編集→コピーでももちろんOS)
手順2)文字化けを消去りたいセル範囲をドラッグで選択(左上の全選択をクリックなどでももちろんOK)
手順3)編集 → 置換 → 検索する文字列の欄をクリックしてCtrl+V → すべて置換をクリック
といった手順ではいかがでしょうか?
画像を見る限りは先頭文字は同じものばかりなので上のようなさ長は1回で済みますし、
仮に10種類くらいまでなら同じ事を繰り返すという手作業でもそれほどの手間では無いと思います。
サンプル画像とは違って、セル1つ1つ、文字化けしている部分の内容が異なるといったような場合は
VBAを使って全角文字を削除するようなものを造らなければならないと思いますが、
そのあたりはいかがなものでしょうか?
↓ Excelマクロに関する話題ですが現時点ではダミーに近いです。
ありがとうございます 解決です たすかりました