再質問、VBA シート間の転記で、条件の追加コードの書き方について教えて下さい。

昨日解決させていただいた件名内容で、質問したいのですが、サンプルはうまくいきましたが、実際のものに、変えて動かすと、エラーがでます。
エラー内容はあとで送ります。
再度確認なのですが、以前送付いただいた転記部分で、変数iがどうしても、０になり、値が入りません。
もしかして、比較しているws1とws2で、データが無いものが、あれば、エラーになるでしょうか？
実際のものはws1にあって、ws2にないもの、または逆、があります。
何度もすみませんが、よろしくお願い致します。

質問者からの補足コメント

• こんばんわ、先日作成いただいたVBAをテストした結果上手くいきました。本当にありがとうございました。
  あとすみませんが、このプログラム内容で、さらに条件をいくつも追加したときの作成方法を教えていただきたいのですが、大丈夫でしょうか？本当に何度もすみませんが、よろしくお願い致します。

  No.7の回答に寄せられた補足コメントです。 補足日時：2023/03/02 19:39

• 

  何度もすみません。
  先と同じファイルを入れたもので、期間を延ばした物を
  下記に貼り付け直します。
  すみませんが、よろしくお願い致します。
  https://xfs.jp/2NrMrz

  No.8の回答に寄せられた補足コメントです。 補足日時：2023/03/02 22:17

No.9 ベストアンサー 回答者： tatsumaru77 回答日時： 2023/03/02 22:52

ダウンロードして拝見しました。

ざっと見たところ、かなり複雑な条件になってます。また、上位Nロットのみ転記条件も、処理としては面倒になります。
申し訳ありませんが、私の方ではできませんので、業者に依頼する等の方法で対処していただけませんでしょうか。

この回答へのお礼

こんばんわ、ご連絡ありがとうございます。
返信が遅れて申し訳ありませんでした。

かなり複雑な内容ですよね、、すみません、ありがとうございました。
一旦こちらでも検討してみます。

お礼日時：2023/03/03 18:31

No.8 回答者： tatsumaru77 回答日時： 2023/03/02 20:08

>こんばんわ、先日作成いただいたVBAをテストした結果上手くいきました。

本当にありがとうございました。

回答：関数式の埋め込みも成功したのでしょうか？

>あとすみませんが、このプログラム内容で、さらに条件をいくつも追加したときの作成方法を教えていただきたいのですが、大丈夫でしょうか？

回答：どのような、条件でしょうか？

この回答へのお礼

ご連絡ありがとうございます。
依頼者から一旦関数は不要という事で、今はナシにしております。
作成する時は以下の内容を参考に対応させていただきます。

条件なのですが、下記に記載しました。3時間で消えますが、。
https://xfs.jp/1EyhBd
今のがベースですが、行けるかどうかすみませんが、確認の方お願い致します。

お礼日時：2023/03/02 20:57

No.7 回答者： tatsumaru77 回答日時： 2023/03/01 11:40

No6の残っている問題点１で、

M列も含めてA～AB列をソートすると関数がなくなると書きましたが、
誤りでした。
関数式は残りますので、問題点１は取り消します。
只、関数式は残りますが、そのセルはソートされ移動します。
従って、セルの参照を行う場合は、その点に留意してください。

この回答へのお礼

ご連絡ありがとうございます。

承知しました。
確認させていただきますね。
ありがとうございます。

お礼日時：2023/03/01 17:47

No.6 回答者： tatsumaru77 回答日時： 2023/02/28 22:53

暫定修正版をアップしました。

ご確認ください。
https://firestorage.jp/download/a5f98f3eafc627b3 …

残っている問題点
１．M列に関数を埋め込む予定ということですが、
M列も含めてA～AB列をソートします。そうすると関数がなくなってしまいます。
その為、対策としては、
案①AC列にをM列の代わりに使い、そこに関数式を埋め込む。
案②マクロでソート完了後に関数式を埋め込む。
又は、関数式と同じ演算をして、結果を設定する。

が考えられます。
案①の場合は、あなたの方で埋め込めばよいので特に問題はありません。
案②の場合は、埋め込む関数式（関数式で行いたいことの説明）を提示してください。

２．関数式を埋め込む場合、引当リストのB～I列は、その車種の先頭の行のみデータが設定されてます。
従って、H列（指定分散数）、I列（引き当て在庫数）を関数式に埋め込むことはできません。
（その車種の先頭の行のみを使用するようにすれば、この限りではありませんが、その位置は毎回かわるので事前に埋め込むことはできないかと）

３．引当リストの未設定項目
全ての列が今回のマクロで設定されたわけではありませんので、
残りの列はあなたの方で確認及び設定を行ってください。
（不明点があれば問い合わせください）

４．注残リストの車種が、各品種在庫リストの車種にない場合の試験をしたので、注残リストが一部変わっています。

この回答へのお礼

ご連絡有り難うございます。承知しました。確認してみます。
本当に有り難うございました。

お礼日時：2023/02/28 22:56

No.5 回答者： tatsumaru77 回答日時： 2023/02/28 21:38

４．注残リストの車種が、各品種在庫リストの車種にないケースがあるそうですが、その場合、

現在はエラーメッセージを表示し、処理を打ち切っています。この場合、どのようにされることを望みますか。
①現状通り（処理打ち切り）
②エラーメッセージを表示して、次の行の車種を処理する。
③エラーメッセージを表示せず、次の行の車種を処理する。
等が考えられます。

この回答へのお礼

何度もご連絡ありがとうございます。
はい、無いこともありますので、③エラーメッセージを表示せず、次の行の車種を処理する。でお願い致します。

お礼日時：2023/02/28 21:40

No.4 回答者： tatsumaru77 回答日時： 2023/02/28 21:21

補足ありがとうございました。

以下五月雨式になりますが追加の不明点です。

１．下記の確認です。
注残リストのG列の工場受注は　引当リストH列の工場受注・指定分散納数へ転記
各品種在庫リストのD列の在庫量は　引当リストK列の引き当て在庫数・PSリアル在庫へ転記
であってますか。

２．各品種在庫リストのSコードは　引当リストのSコード（Q列）へ転記し
これが「不良」なら、引き当て状態（A列）は他になりますがあってますか。
又、「なし」を設定する列は　引当リストのN（S列）であってますか。

３．ws3(引当リスト)の６行目以降を最初にクリアしておかないと、
処理が円滑に進まないのですが、
ws3の６行目以降のどこに関数式が埋め込まれているのでしょうか？
みたところ関数式が埋め込まれていません。
もし、今後、埋め込む予定があるなら、その個所を提示していただけませんでしょうか。

この回答へのお礼

ご連絡ありがとうございます。
下記に回答します。
1.について、はい、合っております。
2.について、はい、合っております。
3.について、はい、これから関数を埋め込もうと検討中です。
　入れるのはＭ列になります。

何度も何度も本当にすみませんが、よろしくお願い致します。

お礼日時：2023/02/28 21:30

No.3 回答者： tatsumaru77 回答日時： 2023/02/28 20:37

今、ダウンロードして確認してみましたが、レイアウトが当初あなたが提示したものと、変わっているので、面食らっています。

レイアウトが全く同じであれば、私が提示した、
Public Sub 転記2()
をそのまま使っていただければ、問題ないのですが、
レイアウトが変わっているので、何をなさりたいのかを解析するまでに時間がかかりそうです。

最初に提示したレイアウトでの、必要重量と部品重量は、新しいレイアウトでは、何と何との名称になりますか。
必要重量に対応するのはなんでしょうか。
部品重量に対応するのはなんでしょうか。
また、必要重量の１０％以内が○という関係は、新しいレイアウトでも有効ですか。並べかえの順序なども、レイアウトと名称が変わるだけで、全く同じ考え方で良いのでしょうか。

前のレイアウトでは、ws3のK,L列をソートのため作業用に使っていましたが、新しいレイアウトでは、使っていない、AA列、AB列を使いますがよろしいでしょうか。

この回答へのお礼

ご連絡ありがとうございます。
確認していただきありがとうございます。
最初のサンプルと、今回の本番フォームが変わり本当に申し訳ありませんでした。
サンプルを参考に、行列を合わせれば問題ないと浅はかな考えでした。
条件の内容は全く同じです。

最初に提示したレイアウトでの、必要重量と部品重量は、新しいレイアウトでは、下記になります。
「必要重量」に対応＝注残リストのG列の工場受注
「部品重量」に対応＝各品種在庫リストのD列の在庫量

必要重量の１０％以内が○という関係は、新しいレイアウトでも有効ですか。並べかえの順序なども、レイアウトと名称が変わるだけで、全く同じ考え方で問題ないです。
またws3（＝今回で言うと引当リスト）のK,L列をソートのため作業用に使っていただいてましたが、項目が増えて新しいレイアウトでは、使っていない、U列以降、もしくはAA列、AB列でも構いません。

ご迷惑をおかけいたしますが、確認の方お願い致します。

お礼日時：2023/02/28 20:57

No.2 回答者： tatsumaru77 回答日時： 2023/02/28 16:34

下記にアップしていただけませんでしょうか。

https://firestorage.jp/
そうしていただけれれば、こちらでチェックします。
アップが完了しましたら、そのURLを提示してください。

この回答へのお礼

ご連絡ありがとうございます。
下記を確認お願いします。
機密情報ですので、フォームはある程度そのままで、
データはいじっております。

https://xfs.jp/t3psCG
よろしくお願いします。

お礼日時：2023/02/28 18:15

No.1 回答者： tatsumaru77 回答日時： 2023/02/28 15:40

前回回答者です。

ws1にあって、ws2にないものがある場合、ws1の車種が処理されないだけです。

ws2にあって、ws1にないものがある場合、エラーメッセージ
「車種が在庫一覧にありません」その車種の行で止まります。

この回答へのお礼

早速のご連絡有り難うございます。
内容の方承知しました。

もし可能なら、こちらの実際のエクセルを確認していただくことできますでしょうか？
またできるなら、同じように。アップロード方法を知りたいのですが、、。
ご迷惑おかけしますが、よろしくお願い致します

お礼日時：2023/02/28 16:22