• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:EXCEL マクロ データが転記されない)

EXCEL マクロ データが転記されない

このQ&Aのポイント
  • データが転記されなくて困っています。以下のマクロは任意のCELLが空欄であるならば、その空欄に他のCELLからのデータを持ってくる。というものですが、一部の部分ではデータが転記されずに空欄のままになってしまいます。原因を特定するため、マクロの詳しい方からの知識をお借りしたいです。
  • EXCEL マクロ データが転記されない問題について困っています。任意のCELLが空欄の場合、他のCELLからデータを持ってくるというマクロがありますが、一部の部分ではデータが正しく転記されずに空欄になってしまいます。原因が分からず困っているので、マクロに詳しい方に知見をお聞きしたいです。
  • EXCEL マクロでデータが転記されない問題に遭遇しています。任意のCELLが空欄の場合、他のCELLからデータを持ってくるというマクロを使用していますが、一部の部分でデータが正常に転記されずに空欄になってしまいます。原因が分からず、解決方法を見つけるためにマクロの詳しい方のアドバイスをお願いできればと思います。

質問者が選んだベストアンサー

  • ベストアンサー
  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.2

>お分かりかと思いますが 判りにくいよ。 ーー コードだけ挙げて、やりたいことも回答者が解読し、答えも教えろ、ですか。 したいことぐらい文章で記述すべきだ。文章に客観かすることで、思考も深まる。 >Do Until s2.Cells(r, 5) = "" くり返しの、終了条件が空白セルに「最初の遭遇」になっているが、其れで良いのか? 空白でないセルは処理しないにしても、範囲の最下セルまでは空白かどうか、判別して空白であれば 他セルから値を取ってくるのではないですか。 VBAを始めて日が浅いのかな。 直ぐこういうところに質問しないで、デバッグの方法も勉強し、デバッグする習慣をつけないと 何時までも力がつかない。 ーー 個人的なお奨め s2.Cells(r, 3)ーー>s2.Cells(r,"C") 可読性が良い Do Untilーー>できればFor Nextループで 本件もこのやり方なら上記の件を考え違いはなくなるだろう。 r=36やr=r+1の行が不要になる。 第3,4,5,6の列を対象にするため、似たコードを連ねているが、1本化できないか、勉強のため今後考えて見ては。

osa0415
質問者

お礼

なんかお恥ずかしくなってしまいました。 こういう質問の仕方はよくないのですね^^;色々反省します。。 分かる限りのご指導ありがとうございました!

その他の回答 (1)

  • nag0720
  • ベストアンサー率58% (1093/1860)
回答No.1

s2.Cells(34, 48)に何が入っているのか分からないので何とも言えないのですが、 デバックのしかたを覚えたらどうですか。 ブレークポイントを設定するとか、ウォッチ式を追加するとか・・・

osa0415
質問者

お礼

ありがとうございます!参考になりました!

関連するQ&A