Excel VBA質問箱 IV

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

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


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

49527 / 76736

←次へ　｜　前へ→


	【32118】Re:空白を除いて範囲内でFor

かみちゃん - 05/12/6(火) 16:34 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>>>問題の表のサンプルと、VLOOKUP数式の具体的なサンプルを提示してみて下さい。
>>
>>
>>　　　　Ａ　　　　Ｂ　　　　Ｃ　　　　Ｄ
>>1　　　伝票番号　作業開始　作業終了　　　　
>>2　　　　　　　　　　　　　　　　
>>3　　　顧客名　　＝VLOOKUP（$A$2,A2:D16,2）　　　　　　　　
>>4　　　所在地　　＝VLOOKUP（$A$2,A2:D16,3）　　　　　　　　
>>5　　　製品　　　＝VLOOKUP（$A$2,A2:D16,4）
>
>シートの指定は省きました。
>Ａ２に伝票番号を入れると項目がＢ３、Ｂ４、Ｂ５に表示されます。

伝票番号、顧客名、所在地、製品の一覧は
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=32103;id=excel
で示された表ですか？
この表は、Keinさんもおっしゃっていますが、当然別シートですよね？

>１つずつ伝票番号をＡ２に入れて、印刷　というのを繰り返さなければならない。
>これをForで自動化したいのです。

最初ご提示されたコード
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=32091;id=excel
と何か全然違うことのようですが、
つまり、For ～ Next で別シートのA列を検索して、空白以外のセルの値
（5、9、12行目を飛ばして）を順に入力して、「印刷作業」をしていき
たいということでしょうか？

それであれば、VLOOKUPを使うこともないと思うのですが・・・
ただ、「作業開始」と「作業終了」はマクロ開始前に入力しておくという
ことですよね？つまり、各伝票番号共通になるということでしょうか？

0 hits

▼

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