Excel VBA質問箱 IV

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

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


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

16006 / 76738

←次へ　｜　前へ→


	【66206】Re:複数のシートの統合について

かみちゃん

- 10/8/8(日) 22:54 -


	引用なし

	パスワード

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

>教えていただいたコードを正しく（？）
>下方
>Next i
>Sheets("一覧").Activate
>の間に挿入したところ、
>
>空白セルは一覧シートにコピーされず実行できました。

何をどうしたいのかよくわからなくなってきました。
すべてのシートのすべてのデータを「一覧」シートにまとめたいということですか？
それとも、更新行だけを「一覧」シートに追加したいのでしょうか？
「更新行」というのは、最終行ではない場合もあるのでしょうか？
その場合、更新行の認識は、どのようにすればいいのでしょうか？
アクティブセルのある行でいいですか？

>しかし、データのないシートがあるとやはり★行がエラーになります。

[66204]でエラー回避のコードを提示していますが、ご確認いただいていますか？
もし、確認いただけているのであれば、現在のコードを再度提示してみてください。

>理想としては一覧データシートが常ににある状態で
>更新行のみ一覧データの最下行に追加されるようにしたかったのですが。
>今の状態では、各支店シートのみが存在する設定で、マクロを実行すると、
>一覧シートが作成される状態なので。

Sub 転記()

End Sub

は、確認されていますか？
更新行ではなくアクティブシートの最終行が転記されますが・・・
アクティブシートの最終行が更新行ではない場合は、更新行を何をもって認識
させるのかが必要です。

>今日はＶＢＡ勉強をいったん終了し、明日再開いたします。
>１日でも早く完成させたいのですが、
>昼前からずっとＰＣに向かっていたので,
>ＶＢＡに慣れない私には、頭がパンクしそうなので(汗)

いろいろ聞いてしまいましたが、ひとつずつ確実に返答していただけると、
完成は間近です。
何がしたいのか、大方推定できましたので、光は見えています。

0 hits

▼

【66198】複数のシートの統合について kamaboko 10/8/8(日) 15:57