- ベストアンサー
エクセル2003・複数のブックに図形をコピーしたい
Prome_Linの回答
- Prome_Lin
- ベストアンサー率42% (201/470)
はい、「Dir("D:\Test\" & "*.xls")」は 「Ｄ」ドライブの「Test」というフォルダ内の 拡張子が「xls」というすべてのファイルという意味です。 それから、エクセルと同じフォルダ内にある テキストボックス、とありますが、 テキストボックスが独立して存在するわけはないので エクセルのファイルとして存在しているのですか？ ワードですか？ エクセルだと、同じフォルダにあると ちょっとやっかいです。 すべてのエクセルのファイルを処理してしまうので、 その「テキストボックス」のあるファイルだけ マクロ（プログラム）用にして、 いったん、別フォルダに置いても構わないでしょうか？ そうか、ファイル名を指定しておいて頂ければ そのファイルをこのプログラムから無視させることも可能ですが、 それでも良いですか？
関連するQ&A
- 複数ブックを纏めて１ブックの1シートずつにコピー
仕事で大量の処理をしなければならず、マクロ化を考えています。 どなたかご教示頂けないでしょうか。 大変困っています助けて下さい。 既定ブック（９シート1,2,3,4,5,6,7,8,9と名前をつけています。レイアウトは全て同じです。）をコピーした後に複数のブック（１シートのみです。既定ブックとほぼレイアウトは一緒です。）を指定し、一部分コピーをし、既定ブックに１シートごとペーストし、（担当者により複数ファイル数は異なります）名前付けてブックを保存後閉じるという作業をマクロ化したいと思っています。 500ファイルを担当者別にコピー＆ペーストしなければならないので、是非ご教示頂けないでしょうか。何卒お願い致します。 なお、ペースト箇所は以下になります。（全てセルの結合をしております。） 【貼付箇所】 コピー元：Range("G6:P13").Select → コピー先：Range("G6:P13").Select コピー元：Range("V5:AD11").Select → コピー先：Range("V5:AD11").Select 【値貼付箇所】 コピー元：Range("AA23:AD27").Select → コピー先：Range("AG26:AG30").Select コピー元：Range("G23:Z27").Select → コピー先：Range("AH26:AH30").Select
- 締切済み
- その他MS Office製品
- Excel 複数ブックを1つのシートにまとめる
フォルダ内のワークブック約2,000個のデータを1つのシートにまとめたいのですが、VBAの勉強を始めたものの時間ばかりかかってなかなかうまくいかないので、ご指導をお願いいたします。 コピー対象の各ブック内のデータは以下の通りです ・シートは一番左端のもの1つ ・データの行数はバラバラで終端行の検出基準は「J列」 ・データの列は12列で固定 上記のようなデータをまとめ用の新規ブックを作って、1つのシートに全ブックのデータを加算してコピーをしたいです。 コピー対象の各ブックのシート名などは要りません。 ご教示よろしくお願いします。
- ベストアンサー
- Visual Basic
- excelでシートのコピーが出来ない
Excel2000でシートのコピーが出来なくて困っています。 シートが６つあり、他のシートはコピーすることが出来るのに、ある一つのシートだけがコピーできません。 そのシートを他のブックへコピーすることは出来たのですが、その新しいブック内でそのシートのコピーを作ろうとするとやはりダメです。 シートの保護はしておりません。 何かわかる方が見えましたら御教示下さい。
- 締切済み
- オフィス系ソフト
- Excel 違うBookのシートをコピーする
Excelでわからないことがあり質問させていただきました。 原紙のBookに 資料のBookのシートをコピーさせたいのですが 資料Bookには シートが sheet1～sheet50まであり 原紙のBookにマクロのボタンやフォームを作成し 毎回資料のBookの違うシート名を選択しコピーをさせることは可能なのでしょうか？ たとえば 原紙のシートに入力フォームを作り sheet名を入力 → 「コピー」のボタンを押すとコピーができる。 といった感じに・・・ フォームでなくてもリストなんかでもいいのですが・・・
- 締切済み
- Excel（エクセル）
- 複数のエクセルブックをひとつのブックにまとめる方法
同一フォルダに複数のエクセルブック（100個以上）が入っています。 その中のSheet1だけ（Sheet1～3まですべてのブックにあります）を一つのエクセルにまとめたいです。 ブックの中にSheet1、Sheet1(1)、Sheet1(2)・・・ みたいになればいいです。 Sheet名がブック名になるのが理想ですが。。 どのようにすればよろしいでしょうか？
- 締切済み
- Visual Basic
- エクセル ブック間コピー マクロ
ブックA（ブック名は固定）のシートA（シート名は毎回違います）を ブックB（ブック名は固定）の一番左へコピーしたいのですがうまくいきません。 動作 ：シートAでマクロを実行しブックBへシートのコピー（挿入）します。 まず第一段階のブックAのシートAをブックBへのコピーがうまくいきません。 シートAが固定シート名ならコードは Sheets("A").Select Sheets("A").Copy Before:=Workbooks("B.xls").Sheets(1) ですが・・・・ Sheets("A").SelectをWith ActiveSheet.Selectにすれば良いのですか？ 申し訳ないのですが、後教授お願いします。
- 締切済み
- オフィス系ソフト
- エクセルのシートを複数のBOOKにコピーしたい
仕事で、エクセルの一枚のシートを、複数のＢＯＯＫにコピーする必要 が出てきました。いちいちシートをＢＯＯＫにコピーしていたのでは時 間がかかって仕方ありません。ある程度、まとめてコピーする方法はな いでしょうか。教えてください。お願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル2003図形を複数のシートにコピーしたい
エクセル2003を使用しています。 図形を複数のシートにコピーする際、一回で（簡単に）できないでしょうか？ セルのコピーは作業グループで可能でしたが、図形はできませんでした。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- bookからbookへの数式のコピーについて教えてください
bookからbookへの数式のコピーについて ？？BookのSheet1のセルにSheet2を参照にした数式が入っています =2+Sheet2!$A8 これを！！BookのSheet1のセルにコピーすると =2+[Book1.xls]Sheet2!$A8 こうなりました コピーしたセルは11,475セルあります [Book1.xls]をすべて消したいのですが、簡単な方法はありますか？
- 締切済み
- その他（ビジネス・キャリア）
- マクロ ブックをマクロなしでコピー
いつもお世話になっております。 マクロのことで 2つ教えて頂きたく書き込みをさせて いただきまいした。 よろしくお願いいたします。 ブックに何枚かシートがあり、 そのシートには全て同じマクロが入ってます。 このブックのシート全てを マクロを削除し新しいブックにコピーをしたいです。 また、コピーをする際に マクロがついているオブジェクト（ボタン） もとってコピーをしたいです。 自力で調べたのですが うまくわからずまた、こちらで質問 させていただきました。 よろしくお願いいたします
- ベストアンサー
- オフィス系ソフト
お礼
度々のコメントありがとうございます。 ＞エクセルのファイルとして存在しているのですか？ ＞ワードですか？ ワードです。 よろしくお願いします。