![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
Excel2013です。
下記コードのように、シートを何枚か選択して、セルを削除するのですが、セルに打ってある、('最初の数式以外を削除)するコードでは1ページ目しか削除されません。その下に書いてある('セルクリア)のコードだときれいに消えるのですが、数式を追加した時見直さないといけないのと、指定まちがいで数式まで消してしまう可能性が高くなります。
グループ化した状態でも選択しているシートの数式以外を削除する方法がありますか?
Sub データ消去()
'Sheets(Array("Sheet1", "Sheet2", "Sheet3)).Select
' 数式以外は削除(グループ化した時1ページしか削除できない?)
Range("C8:Z85,AC8:AF85,Q1:X3").SpecialCells(xlCellTypeConstants, xlNumbers + xlTextValues).
'セルクリア
'Range("C8:E85,G8:I85,K8:M85,O8:Q85,S8:U85,W8:Y85,AC8:AE85,Q1:X3").Select
'Selection.ClearContents
End Sub
No.1ベストアンサー
- 回答日時:
折角マクロを使ってるのですから、出来ることでさくっと片づけてしまいます。
例:
dim w as worksheet
on error resume next
for each w in worksheets(array("Sheet1", "Sheet2", "Sheet3"))
w.Range("C8:Z85,AC8:AF85,Q1:X3").specialcells(xlcelltypeconstants).clearcontents
next
>グループ化した状態でも選択しているシートの数式以外を削除する方法
もしかすると「グループ化」してることに、いったいぜんたいどれほどのコダワリがあるのかによっては、もうちょっと違う手もあるかもしれません。が、上述のように「対象のシート」をふつーに操作していけば、大概の事は素直に片付きます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- Excel(エクセル) ワードのマクロについて教えてください。 1 2023/03/11 13:50
- Visual Basic(VBA) 複数csvを横に追加していくマクロについて 2 2023/04/25 09:19
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/04 10:48
- Visual Basic(VBA) Changeイベントで複数セルへの貼り付けおよび値削除時に1個目のセルのみエラーになる 3 2022/12/21 09:07
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/03/12 10:10
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/10/03 09:55
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2022/04/01 12:11
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
日付が未入力の際はゼロか、空...
-
エクセルで1月0日と表示される!!
-
Rangeメソッドは失敗しました。...
-
Excelの「0」だけ非表示、小数...
-
Excelで複数シートの選択セルを...
-
エクセルで、勤務表から 日付...
-
エクセルで条件に一致したセル...
-
Excelにて、カタカナだけのセル...
-
エクセルで複写のように自動入...
-
EXCELマクロで、シート間でのコ...
-
エクセル ハイパーリンクで画像...
-
アクティブでないシートのセル...
-
EXCEL関数でシート名が変わる可...
-
VBAで変数に関数式の結果をセッ...
-
Excelで条件に合致した範囲の文...
-
(Excel)あるセルに文字を入力...
-
ファイル起動時、毎回 シート1...
-
Excelで同じ位置の異なるシー...
-
式の説明をお願いします。
-
EXCEL2016 別シートの参加予定...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelの「0」だけ非表示、小数...
-
日付が未入力の際はゼロか、空...
-
エクセルで1月0日と表示される!!
-
エクセルで条件に一致したセル...
-
Rangeメソッドは失敗しました。...
-
(Excel)あるセルに文字を入力...
-
Excelで複数シートの選択セルを...
-
エクセルで複写のように自動入...
-
Excelシートの保護時にデータの...
-
シート参照で変数を使いたい(EX...
-
別シートのセルを絶対参照にする
-
複数シートの同じセル内容を1シ...
-
Excelでスクロールすると文字が...
-
Aというブックの1というシート...
-
エクセルで20万行あるシート...
-
エクセルの文字
-
エクセルで、加筆修正したセル...
-
VBAで変数に関数式の結果をセッ...
-
ExcelでTODAY関数を更新させな...
-
VBAで、セル(Range)のオブジ...
おすすめ情報