Excel VBA質問箱 IV

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

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


20689 / 76732 ←次へ | 前へ→

【61456】Re:ループ処理
発言  ゆみこん  - 09/5/9(土) 18:31 -

引用なし
パスワード
   A〜C列の2行目以下で、A〜C列に値が含まれる行を削除と言う事なら、

With Range("A:C")
   .AutoFilter
   .AutoFilter Field:=1, Criteria1:="<>"
   .AutoFilter Field:=2, Criteria1:="<>"
   .AutoFilter Field:=3, Criteria1:="<>"
  
   ' Select を Delete に変更
   Range("A2", Cells(Rows.Count, 1).End(xlUp).Resize(, 3)).SpecialCells(xlCellTypeVisible).EntireRow.Select
  
   ' 下記をコメントアウト
   '.AutoFilter
End With

と言う事ですか?

0 hits

【61455】ループ処理 HAM 09/5/9(土) 17:49 質問
【61456】Re:ループ処理 ゆみこん 09/5/9(土) 18:31 発言
【61486】Re:ループ処理 HAM 09/5/13(水) 11:07 お礼
【61457】Re:ループ処理 kanabun 09/5/9(土) 18:55 発言
【61487】Re:ループ処理 HAM 09/5/13(水) 11:08 お礼

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