• ベストアンサー

VBAによるブック間のシートの移動またはコピペ

検索で探すもピッタリ来るものが探せなかったものですみません。 Aブックにシート１とシート２があります。 bブックにシート３があります。 シート２とシート３の名前は同じ"abc"とします。 Aブックのシート１にコマンドボタンを設置し、このボタンをクリックするとシート３をシート２に移動またはコピー＆ペーストするようにVBAで実現できますでしょうか？ よろしくご教授ください。

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

  • ベストアンサー
noname#79209
noname#79209
回答No.1

要は、 「Ａブックのシート２を、ｂブックのシート３で置き換えたい」 ということでしょうか？ マクロの記録を使って、マクロを作ったら良いのでは？ これで作られたものを、加工しても良いでしょう。

yokagura
質問者

お礼

ありがとうございます。 すごく簡潔に表現して下さいました。その通りです。 そしてアドバイスの通りマクロを作りましてボタンに登録したら 簡単に実現することが出来ました。 マクロ実行の途中でメッセージが出ましたが、 マクロでのメッセージは不要なので Application.DisplayAlerts = False （本文） Application.DisplayAlerts = True と加工を入れてメッセージを出なくすることができました。 ありがとうございました。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • Excel2007でBOOK間のシート移動をVBAで行うとエラーになる

    Excel VBAで開発されたソフトの改造を行ってますが、Excel2007で動作しないマクロがあり困ってます。 <開発環境> ・WindowsXP Pro SP3 ・Celeron 540(1.8GHz) ・メモリ1GB ・Excel2007 SP1 (Microsoft Office2007) 改造元ソフトはOffice2000で開発されており、Excel2007で動作するとマクロエラーが発生する処理があります。 因みにまだソフト改造はしてなく、そのままExcel2007で動作させるだけでマクロエラーが発生します。 発生する箇所はVBAで開発されており、下記のコマンドです。 Sheets(移動元シート名).Move Before:=Application.Workbooks(移動先ブック名).Sheets(1) 異常の内容は下記になります。 ------------------------------- ?err.Description 移動先またはコピー先のブックの行列数が元のブックの行列数よりも少ないため、シートを移動先またはコピー先のブックに挿入できません。データを別のブックに移動またはコピーするには、データを選択して、[コピー] コマンドと [貼り付け] コマンドを使用して移動先またはコピー先のブックのシートに挿入してください。 ?err.Number 1004 ------------------------------- 移動元BOOKは１シート、移動先BOOKは１シートあります。 これをExcel2000で実行すると正常にシートが移動できます。 （移動元BOOKのシートがなくなりBOOKが終了して、移動先BOOKは２シートになります） Excel画面の移動元シートを選択して、右クリックメニューの「移動またはコピー」で移動先ブックを指定して移動すると 「移動先またはコピー先のブックの行列数が元のブックの行列数よりも少ないため、シートを移動先またはコピー先のブックに挿入できません。データを別のブックに移動またはコピーするには、データを選択して、[コピー] コマンドと [貼り付け] コマンドを使用して移動先またはコピー先のブックのシートに挿入してください。」 とVBAから実行した時と同じ内容のエラーダイアログが表示されました。 （Excel2000では手動でも移動できました） Excel2007では１シートで構成されたBOOK間の移動はできないのでしょうか？ また、これをVBAで対策しようとした場合にどうしたら良いのでしょうか？ ネットで調べましたが判らず、ここで質問させて頂きました。 判りにくい説明で申し訳ありませんが、よろしくお願いします。

  • エクセルのVBAで新しくブックを開いた上でさらに…

    エクセルのVBAで新しくブックを開いた上でそのブックにVBAを埋め込む事はできますか？ 分かりにくいと思うので具体的にかきます。 今、ブック１にコマンドボタンAがあり、このボタンAを押す事により 以下の２つを実現したいです。 (1)あたらしくブック２を開きます。 (2)更にこのブック２のシートにはコマンドボタンBができており (3)このボタンBの機能としてこのボタンBを押すと 　ブック２のセルA１に数字１が入ります ブック２が開いた後で自分で、コマンドボタンBのマクロをブック２のモジュール内に書くのは簡単ですが、ブック１のコマンドボタンAを押したときに自動的にブック２のマクロを書き込みたいのです。 今、ボタンAを押すことで(1)と(2)まではできるのですが (3)のやり方がわかりません。 そもそもこういった事はできないのでしょうか？ ご存知の人がいたら教えてください。よろしくお願いします。

  • ブック間のシート移動

    EXCEL VBA初心者です。 ブックAのシートAをブックBのシートの一番左側に移動させようと思います。 以下を実行するとエラーが出ますがなぜでしょうか？ エラーの原因と対策方法を教えて下さい。 Sub シート移動() Worksheets("シートA").Move _ Before:=Workbooks("ブックB.xls").Sheets(1) End Sub ブックAはブック名が毎回変わります。 ブックAはメール添付を開いたブックです。 ブックAはシートがシートAしかありません。 シートAは名前が変わりません。 マクロコードはブックBあるいは個人用マクロブックに置きます。 よろしくお願いします。

  • ＥＸＣＥＬ　　ＶＢＡ シートコピー、名前変更他

    ＥＸＣＥＬ　　ＶＢＡ (1)シートコピー、名前変更 (2)他の固定のbookへ転送をＶＢＡで記述 book1のsheet1を開き、そのsheetをコピーしたものをABCというsheet名に替え、 それをbook2のsheetの後ろへ移動するというマクロをPersonalに作ろうとしていますが、 インデックスエラーとか【アプリケーション定義または、オブジェクト定義のエラー】とかインデックスエラーとか になります。 book1のsheet1とかは、マクロを使う場合は、固定的な名前でなくいろいろそのときどきでかわる名前ですが、 マクロを使って、そのsheetをコピーしたものをABCとしてbook2のsheetの後ろへ移動したいということです。 よろしくお願いします。

  • excel vba 複数シートをまとめる

    お世話になります。 A.xlsというブックがあります。 その中に[集計]というシートがあります。 このシートに[ボタン]を配置してクリックしたら以下の動作を実現させたいのです。 (1)[集計]シートのA2に位置セット (2)[東京]、[大阪],[名古屋]という名称のシートの列=A2～A62、行=A2～データ最下行にある全データを[集計]シートにどんどんコピー貼り付けして追加していきたいのです。 上記動作を実現するVBAのロジックをどなたかご教授いただけますでしょうか。 よろしくお願い致します。

  • Excel2007 ブック間でのシートコピー

    Excel2007を使っています。 ブックABCのシート1を、ブックEFGにコピーしたいのですが・・・ コピーしたいシート名（画面下のタブ）を右クリックし、「移動またはコピー」をクリック、「移動先ブック名」でブックEFGを選択したいのですが、「新しいブック」しか選択できません。 新しいブックにコピーしても、それをブックEFGで取り込めれば いいのですが、何か方法はないでしょうか？ よろしくお願いします。

  • シートの移動が出来ません。

    エクセルのシートを別のブックに移動が出来ません。「コピー先のブックの行列数が元のブックの行列数よりも少ないため、シートを移動先またはコピー先のブックに挿入出来ません。データを別のブックに移動またはコピーするにはデータを選択してコピーコマンドと張り付けコマンドを使用して移動先またはコピー先のブックシートに挿入して下さい。」と表示されます。この意味がいまいちわかりません。移動元が２つのシートにわけられ、ひとつのシートにサムイフ関数が入っています。なぜ行列数が違ってしまうのでしょうか？

  • VBA(エクセル)で自動的にボタンをクリックさせるには

    いつもお世話になっております。 下記のことがしたいのですがどうやって良いのかがわからなくって困っております。 やりたいこと。 AブックとBブックが有るとします。(双方ともエクセルファイル) エクセルのVBAで、Aブックのシート上のコマンドボタンを押すと Bブックのシート上のコマンドボタンをクリックするという動きを VBAでさせたいのですがどうしてもクリックさせることができません。 試したこと。 初めは、AのボタンをクリックするとBのボタンをセレクトして SendKeysでENTERを送ってみたりしたのですがうまくいきませんでした。 何かやり方が有りましたら、お教えいただけませんでしょう。 宜しくお願いいたします。

  • EXCEL VBA シートの名前を指定してコピー

    EXCEL　VBA 初心者です。 とても困っています。 助けてください。 excel2010を使っています。 今，「原本」というシートがあり，それをマクロを使って同じブック内にコピーしたいと思っています。 コピーして新しく作られたシートの名前は「A1」のセルに入力されている値にしたいです。 コピーされた後のシートにはマクロボタンは削除したいと考えています。 また，コピーした後のアクティブシートは「原本」のシートにしたいのですが これを全部いれたコマンドはどのようになるのでしょうか。 似たような質問だったり，回答があるのですが， どのように組み合わせたらいいのかよく分かりません。 どなたかお助けいただけないでしょうか。 よろしくお願いします。

  • ExcelVBA2010 マクロが動作しない

    Excel2010のＶＢＡについて質問します。 ブックＡとブックＢがあり、ブックＡにはＶＢＡのモジュールの記述がります。 そのブックＡの中にあるシート１にコマンドボタンを作成し、このボタンにモジュールが登録されています。 ブックＡを起動すると、ブックＡの中にあるシート１をブックＢにコピーします。 ブックＢにコピーされたシート１のコマンドボタンに登録されているボタンをクリックすると、ブックＡのＶＢＡのモジュールが起動され動作されるはずですが、なぜかブックＢ内のシート１のコマンドボタンのモジュール先がブックＡでは無くブックＢ内のリンク先に変更されてしまい、ＶＢＡが動作しません。 パソコンＡでは動作し、パソコンＢでは上記のエラーになってしまいます。 Ｅｘｃｅｌ本体の設定等を見比べましたが、一向にわかりません。 どうかご教授をお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する