Excel VBA質問箱 IV

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

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


69908 / 76732 ←次へ | 前へ→

【11337】WITHステートメント
質問  liee_chang  - 04/3/5(金) 17:39 -

引用なし
パスワード
   基本的なことかもしれないんですが、本をみても解決しません。
withステートメント内でエラーが出てしまいます。
わかるかたいらっしゃいましたら、教えてください・・。

シートのセルが空欄だったらある範囲の色と保護をはずす。これをトナリのシートにも繰り返すというロジックにしたいのです。

r = 1
  Do While Worksheets(r + 1).Cells(18, 4).Value = ""
    Range("D18:O19,D25:O28").Select
      
      With Selection.Interior
        .ColorIndex = 8
      End With
      
    Selection.Locked = False
    Selection.FormulaHidden = False
      
    r = r + 1
  Loop

0 hits

【11337】WITHステートメント liee_chang 04/3/5(金) 17:39 質問
【11338】Re:WITHステートメント IROC 04/3/5(金) 18:31 回答
【11373】Re:WITHステートメント りん 04/3/7(日) 13:15 回答
【11385】Re:WITHステートメント liee_chang 04/3/8(月) 11:45 お礼

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