Excel VBA質問箱 IV

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

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


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

49551 / 76736

←次へ　｜　前へ→


	【32091】空白を除いて範囲内でFor

seiji - 05/12/6(火) 12:55 -


	引用なし

	パスワード

ＶＢＡマクロについて

リスト（一覧表）をつくって、vslookup関数を使い、
伝票番号を指定すると行のデータだけ表示できるワークシートを準備しました。
伝票番号を１個ずつ指定すればデータを閲覧できるのですが、一覧票は大きくなり
データ数が多く、煩雑になりました。そこで、ＶＢＡマクロを利用して
作業をしようと思いました。
伝票番号についてはvslookupの性質上、常に番号順ですので
開始番号と終了番号を指定して、Forでくり返しさせようと試みています。
A1　　　　 B1

（伝票番号は、連番で１ずつ増加でつけてあります。）

しかし、リストは、番号順ですが欠番があり空白が存在します。
以下のようなFor文を組むと空白の行に対しても作業を繰り返してしまうので、

Sub 開始終了指定()
開始 = Range("A1").Value
終了 = Range("B1").Value
For a = 開始 To 終了

（１）リストの指定範囲から伝票番号を取得して
（２）指定範囲中の空白行を除いた番号に対してForができるようにしたいのですが

ご指導お願いいたします。

0 hits

▼

【32091】空白を除いて範囲内でFor seiji 05/12/6(火) 12:55

≪