A 回答 (3件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
kokosu525さん
次のコードで対応できるかと思います。
ご確認下さい。
Sub クリアー()
Dim セル As Range
For Each セル In Rows("3:" & Rows.Count).SpecialCells(xlCellTypeConstants)
If セル <> "/。" Then セル.MergeArea.ClearContents
Next
End Sub
この回答への補足
J5:AN13の範囲だけを対象範囲にして削除したいです。
この範囲以外は、スタッフ氏名や行事などの入力がされていますので消したくないです。
No.1
- 回答日時:
kokosu525さん
こんにちは。
以下のプログラムでできるかと思います。
ただ条件としては、日や曜日は1,2行目として3行目以降対応しています。
また、処理するシートはActive(表示)しているシートです。
お試し下さい。
Sub クリアー()
Dim セル As Range
For Each セル In Rows("3:" & Rows.Count).SpecialCells(xlCellTypeConstants)
If セル <> "/。" Then セル.ClearContents
Next
End Sub
回答、ありがとうございます。
さっそく試してみました。
ただ、エラーになってしまいました。
私の説明不足で、表の下に、結合したセルがあり行事などの記載があります。結合したセルが影響してエラーになってしまうようです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Excel(エクセル) Excelについて質問です(ver2019) 1 2023/06/30 21:20
- Visual Basic(VBA) Excelにて、シート1の行を削除するとシート2のシート1と同じ番号の行も削除したい 3 2022/05/08 04:24
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 16:07
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- オープンソース csvデータのダブルクォーテーションで囲まれた文字内にあるカンマを削除したい 3 2022/09/02 15:17
- Excel(エクセル) Excelの関数で実現可能か知りたいです 5 2023/08/06 08:58
- Visual Basic(VBA) 列を指定して値を左から5文字にそろえる 1 2022/06/10 20:28
- Visual Basic(VBA) Excel VBA 書式変更で困ってます。 オートフィルターの日付フィルターを用いて データの絞り込 2 2022/07/26 22:16
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
特定の文字がある行以外を削除するマクロ
その他(Microsoft Office)
-
Excel VBA A列が特定の値以外の場合、その行を削除
Excel(エクセル)
-
Excel vbaで特定の文字以外が入っている時、メッセージを表示させるプログラムについて
Visual Basic(VBA)
-
-
4
エクセルで複数列の検索をマクロで行いたい
Excel(エクセル)
-
5
EXCEL VBA で特定の文字に色をつけるマクロを書きたいのですが
Excel(エクセル)
-
6
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
7
指定した文字があった場合、その行を削除するマクロが欲しいです
Excel(エクセル)
-
8
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
9
【Excel VBA】複数ある特定の文字列を含む行を削除
Excel(エクセル)
-
10
【vba】指定範囲の中に任意の文字があるときの条件分岐
Excel(エクセル)
-
11
【VBA】条件に一致しない行を削除したい 複数条件
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
セルをクリック⇒そのセルに入力...
-
対象セル内(複数)が埋まった...
-
エクセルで指定したセルのどれ...
-
Excelで数式内の文字色を一部だ...
-
【エクセル】IF関数 Aまたは...
-
貼り付けで複数セルに貼り付けたい
-
excelのCOUNTIF関数で、『範囲=...
-
(Excel)数字記入セルの数値の後...
-
エクセルのセルの枠を超えて文...
-
エクセル 足して割る
-
EXCEL VBA セルに既に入...
-
複数のセルのいずれかに数字が...
-
Excelでのコメント表示位置
-
枠に収まらない文字を非表示に...
-
Excel 例A(1+9) のように番地の...
-
エクセル オートフィルタで絞...
-
【Excel】 セルの色での判断は...
-
ロール紙の残量の計算を教えて...
-
複数セルに入力した数字をカン...
-
Excelで、「特定のセル」に入力...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで指定したセルのどれ...
-
【エクセル】IF関数 Aまたは...
-
貼り付けで複数セルに貼り付けたい
-
対象セル内(複数)が埋まった...
-
Excelで数式内の文字色を一部だ...
-
セルをクリック⇒そのセルに入力...
-
Excelでのコメント表示位置
-
エクセル 足して割る
-
excelのCOUNTIF関数で、『範囲=...
-
EXCEL VBA セルに既に入...
-
エクセル オートフィルタで絞...
-
エクセルのセルの枠を超えて文...
-
(Excel)数字記入セルの数値の後...
-
エクセルの一つのセルに複数の...
-
【Excel】 セルの色での判断は...
-
Excel2003 の『コメント』の編...
-
エクセル “13ヶ月”を“1年1ヶ月...
-
複数のセルのいずれかに数字が...
-
枠に収まらない文字を非表示に...
-
excelの特定のセルの隣のセル指...
おすすめ情報