質問: vbaで打ち消し線の入った文字を特定する方法 excel vbaに関する質問です。 指定したセル範囲の中で、打ち消し線の入った文字が記入されているセルを見つけ、 そのセルの行を削除、上詰めにしたいと考えています。 方法をご教授いただけませんでしょうか。 ※空いているセルはどのように使用してもokです。 イメージとしては下のようになります。(打:打消し線の入った文字) d列を検索し、打ち消し線の入ったセルを特定 特定したセルの属する行(2、4、5、6)ごと削除し、上詰めにする。 a b c d e f g 1 あ 2 打 ...削除、上詰 3 い 4 え 打 ...削除、上詰 5 お 打 ...削除、上詰 6 打 か ...削除、上詰 7 う マクロ実行後↓↓↓ a b c d e f g 1 あ 2 い 3 う
回答: マクロを使わなくても一機に削除可能です。 (1)d列を選択して、ctrl+fで「検索と置換」を表示します。 (2)「検索と置換」画面で「オプション」を開きます。 (3)「書式」ボタンで「書式の検索」を開き、「フォント」タブの「文字飾り」で「取り消し線」にチェックします。 (4)「すべて検索」を実行して、下にリストされた検索結果をctrl+aで全選択します。 (5)「編集」-「削除」で「行全体」を選択し、削除します。 以上です。 なお、どうしてもマクロで行う場合は、"下の行から"削除した方がいいでしょう。