Excel VBA質問箱 IV

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

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


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

9865 / 76734

←次へ　｜　前へ→


	【72426】Re:再：２つのシートのデータを照合し列が一致したら転記したい

kiki - 12/8/8(水) 22:13 -


	引用なし

	パスワード

kanabun さん：

こんばんは！
お返事ありがとうございます。
ご返答頂いた件ですが、一部先走って質問してしまい申し訳ございませんでした。
気ばかり焦ってしまい、コードの解読もままならないまま質問してしまいました。

　 >→ 「ﾃﾞｰﾀ」という名前のシートがないのでは？
作成したはずだったのですが、全角、半角など些細な違いがあったのかもしれません。後日試します。

>'--------------------------------------------
>Private Sub CopyLine(該当セル As Range, 転記先 As Range)
>　　該当セル.Offset(, 1).Resize(, 21).Copy 転記先
>　　
>End Sub
>'--------------------------------------------
>がモジュールに書いてないからでは？

「Private Sub」というものを初めて知りました。
そういうものがあるのですね。
確かに他のコードには記載ありました。
初心者本には記載ないのか、私が見落としているのか。
また勉強になります。調べてみます。

>う～ん、
>最後のこちらからの提案は読んでもらえましたか？
>
>抽出リストは別の専用シートに置くという案です。

大変失礼なことをして申し訳ございませんでした。
kanabun さんはきちんとこれらの処理による問題点を見抜いてご提案して頂いてたのですね。
気ばかり焦って質問してしまい、ご気分を害されたのでしたなら申し訳ございませんでした。
頂いた回答を理解して質問するよう気をつけます。

抽出リストを用意するというご提案ありがとうございます！
やはり表形式でないリストはあったほうが運用面でも安心ですよね。
他に流用するかもしれませんし。

いただいたコードをプリントアウトしましたので、就寝までにらめっこして解読理解し明日またチャレンジしてみたいと思います。

何度もありがとうございました。

7 hits

▼

【72393】２つのシートのデータを照合し列が一致したら転記したい kiki 12/8/1(水) 23:50