Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

11736 / 76734

←次へ　｜　前へ→


	【70530】データを検索したり行削除したりしたい

かさねるくん - 11/11/26(土) 11:07 -


	引用なし

	パスワード

今は力技でやっているのですが、データ量が数千件になってから速度が遅くなりすぎてしまったので改善したいと思い、質問させて頂きます。

データは1行単位で下記のようになっています
A列　 B列　 C列　 D列　 E列・・・
番号　種別　内容1　内容2　内容3
番号　種別　内容1　内容2　内容3
番号　種別　内容1　内容2　内容3
番号　種別　内容1　内容2　内容3

この種別毎に件数をカウントしたり、選択した種別以外のデータを行で削除したいのです（複数の種別を選択することもあります）
種別はアルファベットで始まる英数5桁ですが、大文字小文字が混ざっています
種別は先頭の1文字だけで選別して大丈夫です（K1235とk4278も同じ種別）

現在やっているやり方は、For文で1行毎にデータを見て、種別の先頭文字が選んだ物なら最終列にマークを入れ、件数に+1し、最終行まで繰り返します
最終行まで終わったら、マークの無い列を1行1行Selectして削除しています

これと同じ動作をもう少し早く行うことはできないでしょうか？
ScreenUpdatingはFalseにしています

2 hits

▼

【70530】データを検索したり行削除したりしたい かさねるくん 11/11/26(土) 11:07

≪