Excel VBA質問箱 IV

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

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


45005 / 76732 ←次へ | 前へ→

【36734】Re:オートフィルタの結果を他のオートフィル...
質問  初心者  - 06/4/11(火) 12:30 -

引用なし
パスワード
   ご指摘ありがとうございます。

>>オートフィルタそかけた行の指定セルに貼り付けするにはどうしたらいいでしょうか?
>>最終的には、在庫シートに転記された販売数を仕入れシートに転記して、現在数を
>>だしたいのです。
>「オートフィルタで抽出したデータ」がどうな風にフィルタをかけているのか解らないから、どの部分だか解らない。

オートフィルタで抽出したデータとは、在庫シートの入力フォーマットを入力する時に、仕入れ番号と販売数を入れるので、仕入れ番号のデータをオートフィルタをかけて表示するということです。
取引を全て商品名ではなく、番号を振り当てて管理しています。

上記箇所の

>If WS3.AutoFilterMode = False Then
>  WS3.Range("A:AQ").AutoFilter Field:=2, Criteria1:=WS4.Range("B23")

のB23とは仕入れ番号です。

>また指定セルにって簡単に言っているけど、どんな状態のセルなのかさっぱり解らない。
>どのように張付けるのかも解らないです。
>

説明不足で申し訳ありません。
指定セルというのは、仕入シートも在庫シートも同じ取引番号が入力されているので、両方とも同じ取引番号でオートフィルタをかけた後のセルです。
仕入れシートでオートフィルタをかけると、在庫数という列があり、オートフィルタをかけた在庫数というセルに在庫シートから抽出したデータを貼り付けたいとおもっています。

今回のコードは仕様書も設計書もなく、いろいろと要求がきて随時機能を追加している。。。という感じなので、私の方でも対応ができず、以前に作っていたものを
途中から書き換えて・・・。
という形でできてしまったので、
上記のような形式になってしまいました。

もっと簡単な方法があるのなら、そうしたいのですが・・。

>もっと簡単に書けたかなと思っていますが....。
>(最も仕様をどうするか決めていなかったから試作みたいな物。)
>http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=142;id=FAQ
8 hits

【36730】オートフィルタの結果を他のオートフィル... 初心者 06/4/11(火) 11:11 質問
【36732】Re:オートフィルタの結果を他のオートフィ... Jaka 06/4/11(火) 11:40 発言
【36734】Re:オートフィルタの結果を他のオートフィ... 初心者 06/4/11(火) 12:30 質問
【36737】Re:オートフィルタの結果を他のオートフィ... Jaka 06/4/11(火) 15:40 発言
【36743】Re:オートフィルタの結果を他のオートフィ... 初心者 06/4/11(火) 18:07 質問
【36748】Re:オートフィルタの結果を他のオートフィ... Jaka 06/4/12(水) 14:24 発言
【36803】Re:オートフィルタの結果を他のオートフィ... 初心者 06/4/14(金) 11:04 質問
【36816】Re:オートフィルタの結果を他のオートフィ... Jaka 06/4/14(金) 16:08 発言
【36820】Re:オートフィルタの結果を他のオートフィ... Jaka 06/4/14(金) 17:22 発言
【36828】Re:オートフィルタの結果を他のオートフィ... 初心者 06/4/14(金) 18:38 質問
【36869】めちゃくちゃ間違ってました。 Jaka 06/4/17(月) 10:33 発言
【36893】Re:オートフィルタの結果を他のオートフィ... 初心者 06/4/17(月) 15:45 お礼

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