Excel VBA質問箱 IV

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

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


2694 / 13645 ツリー ←次へ | 前へ→

【66536】ブランクの行を削除するいい方法 Sonson 10/9/8(水) 23:04 質問[未読]
【66538】Re:ブランクの行を削除するいい方法 kanabun 10/9/8(水) 23:17 発言[未読]
【66539】Re:ブランクの行を削除するいい方法 かみちゃん 10/9/8(水) 23:21 発言[未読]
【66540】Re:ブランクの行を削除するいい方法 kanabun 10/9/8(水) 23:30 発言[未読]
【66542】Re:ブランクの行を削除するいい方法 Sonson 10/9/9(木) 0:04 お礼[未読]

【66536】ブランクの行を削除するいい方法
質問  Sonson  - 10/9/8(水) 23:04 -

引用なし
パスワード
   A列目の値がブランクならその行を削除したいと考えています。

1.データの行数を確認する (nだったとする)
2. for-next文でn ,n-1 , …, 1行を順にチェックし
A列の値がブランクなら削除する

という流れをとっていますが、 for-next文でn ,n-1 , …, 1行
とする以外に、この目的を達する処理を行うことはできるんでしょうか?
-1ずつ減るというのが個人的に気持ち悪くて。

【66538】Re:ブランクの行を削除するいい方法
発言  kanabun  - 10/9/8(水) 23:17 -

引用なし
パスワード
   ▼Sonson さん:

>A列目の値がブランクならその行を削除したいと考えています。

行数はどのくらいですか?

数千行なら、

 On Error Resume Next
 
 Range("A1", Cells(Rows.Count, 1)) _
    .SpecialCells(xlBlanks).EntireRow.Delete
 
 On Error GoTo 0

のような方法もあります。

【66539】Re:ブランクの行を削除するいい方法
発言  かみちゃん  - 10/9/8(水) 23:21 -

引用なし
パスワード
   こんにちは。かみちゃん です。

> for-next文でn ,n-1 , …, 1行とする以外に、この目的を達する処理

・A列で並べ替えて一括削除
・オトーフィルタでA列がブランクセルを抽出して一括削除
・A列でブランクセルのみを一般操作のジャンプ機能で選択して、行削除
・数式でブンクかどうかを判定して、ブランク行を削除

などなど、いろいろあります。
ブランクとは、数式等ではなく、何も値が入っていないものという前提です。

【66540】Re:ブランクの行を削除するいい方法
発言  kanabun  - 10/9/8(水) 23:30 -

引用なし
パスワード
   ▼Sonson さん:

行数が多いなら、
一般機能[データ]-[フィルタ]-[フィルタオプションの設定]で、
「A列に値の入っている行だけ」
別シートに抽出したほうが速いです。

【66542】Re:ブランクの行を削除するいい方法
お礼  Sonson  - 10/9/9(木) 0:04 -

引用なし
パスワード
   みなさんさすがですねー。
教えてもらったことでチャレンジしてみます♪

ありがとう

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