Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


11293 / 76735 ←次へ | 前へ→

【70980】UsedRange.SpecialCells(xlCellTypeFormulas)について
質問  りんご  - 12/1/23(月) 11:20 -

引用なし
パスワード
   よろしくお願い致します。

次のマクロで、エラーが発生して、NextSheet へ飛んでくれません。
intShIndxのシート中に計算式が1つも入っていないため、エラーとなっています。
Book内の全てのシートで、関数が設定されているかどうかのチェックをしているのですが、何か良い方法はありますか?


実行時エラー '1004'
該当するセルが見つかりません。


    On Error GoTo NextSheet
    
    Set Sh = Worksheets(intShIndx)
  
    Set Rng = Sh.UsedRange.SpecialCells(xlCellTypeFormulas)

2 hits

【70980】UsedRange.SpecialCells(xlCellTypeFormulas)について りんご 12/1/23(月) 11:20 質問
【70981】Re:UsedRange.SpecialCells(xlCellTypeFor... kanabun 12/1/23(月) 11:43 発言
【71049】Re:UsedRange.SpecialCells(xlCellTypeFor... りんご 12/1/27(金) 9:46 お礼
【71056】Re:UsedRange.SpecialCells(xlCellTypeFor... りんご 12/1/27(金) 11:05 質問
【71058】Re:UsedRange.SpecialCells(xlCellTypeFor... りんご 12/1/27(金) 11:20 お礼
【71060】Re:UsedRange.SpecialCells(xlCellTypeFor... kanabun 12/1/27(金) 11:22 発言
【71059】Re:UsedRange.SpecialCells(xlCellTypeFor... kanabun 12/1/27(金) 11:20 発言

11293 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free