現在、仕事でexcelファイルAに、シート1枚につき1日分のデータを入力しています。
sheet1⇒7/1、sheet2⇒7/2、という風に。
その入力したデータを、1週間ごとにクライアントに報告するため、
別のexcelファイルBの1sheet内に決まったフォーマットにて、
手入力で入力しています。
ファイルAの各シートの中の決まった複数のセルの値をコピーして、
ファイルBの各シートの中の決まった複数のセルにそれぞれ貼り付ける作業を
マクロを組んでボタン1つで実行したいと思っているのですが、
そのようなことは可能でしょうか?また、上記のマクロを以下の条件のもとで可能ですか?
・ファイルAとファイルBの格納場所は、同じサーバ内の別のフォルダ内 に保管されています。
・マクロ実行する際、それぞれのファイルA,Bをその都度起動しないで、
ファイルAの指定したセルの値をファイルBの指定したセルへ反映したいです。
・ファイルCにマクロボタンをつけてマクロを組み、実行したいので、マクロ実行時には、
ファイルCだけ、その都度起動したいです。
・そのファイルCの保管場所は、ファイルBと同じフォルダ内に入れたいです。
例)
Aの格納場所:\\ServerA\C_社内\週報\7月\週報(7月第1週).xls
Bの格納場所:\\ServerA\C_社内\日別集計\7月\週報(7月第1週).xls
Cの格納場所:\\ServerA\C_社内\週報\7月\週報マクロ.xls
説明が分かりにくくてすみません。
ご教授のほど宜しくお願いいたします。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
No1です。
なかなか回答が付かないようですね。お役に立てるかわかりませんが、以下、アドバイスです。
Aのファイル 週報(7月第1週).xls
は、毎週ファイル名が変更されるが、シート名は固定で、7枚ある。各シートの構成は同じ
Bのファイル 週報(7月第1週).xls
は、毎週新規に作成するが、シートは1枚で、先のファイル7枚の内容を1枚にしたもの。
といった感じでしょうか。
例えば、
Cファイル(集計のためのマクロのみ作成するファイル)を開きます、
次に、Aのファイル、Bのファイルを開きます。
Cのファイルにモジュールを作成
Sub ボタン1_Click()
Workbooks(2).Activate
End Sub を実行してみてください。
WorkBooks(1)は最初に開いたCブック、WorkBooks(2)は次に開いたAブック、WorkBooks(3)は次に開いたBブックとなります。
Sub ボタン1_Click()
For i=1 to 7
MsgBox Workbooks(2).Worksheets(i).Range("A1").Value
Next
End Sub
これで、シートが1番目から順に7番目まで変わっていくと思います。
これを利用して
Sub ボタン1_Click()
For i = 1 To 7
Workbooks(3).Worksheets(1).Rows(i * 10 & ":" & i * 11).Value = Workbooks(2).Worksheets(i).Rows("1:10").Value
Next
End Sub
とすれば、Workbooks(3)のひとつのシートに上から順に、Workbooks(2)の7枚のシートの上から10行の値が入ると思います。
あとは、編集してみてください。
hallo-2007さん
アドバイスありがとうございます!
参考にさせていただきます。
拙い文章に何度もご回答いただき
ありがとうございます。
No.1
- 回答日時:
質問を拝見いたしましたが、出来る出来ないで回答すれば出来ますが、
たいへん複雑で、しかもデータの構成も提示されていないので誰も回答できないのではないでしょうか?
現在、手作業で行っている作業も大変だと思いますが、その理由の多くは
>シート1枚につき1日分のデータを入力しています。
に原因があります。データは日付とともに1枚のシートにひたすら縦方向に入力してください。
このままでは、シート数が膨大になり、希望するシートへ移動するのも大変になりますし、ファイルも大きくなってしまいます。
ご使用のパソコンにもよりますが、限界に達して将来使えなくなります。
まずは、ここを改善する事が優先順位の1番目にあると思います。
早急なご回答ありがとうございます。
>シート1枚につき1日分のデータを入力しています。
→こちらに関しては、私個人的にもhallo-2007さんと同意見です。
ただ、現在使っている報告系のファイルは、すべてクライアント指定のもので、変更できないか提案を行ったら意味不明なセキュリティポリシーを1時間ほど説教され、却下されてしまいました。。。
社内用にファイルを作ることも、それをサーバ内にもローカルにも保管することをクライアントの命令で現在出来ない状況なんです。。。
ご回答ありがとうございました。
やはり自分でがんばって一から勉強いたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBA ふたつの同じ様式シートのセルをコピーしたい 2 2023/03/08 15:28
- Excel(エクセル) Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい 8 2022/09/07 15:12
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
- Visual Basic(VBA) 顧客ごとに違う点検案内を作成するマクロ 4 2022/09/16 05:34
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) 指定月分の顧客データファイルを統合して並べ替え、所定の場所に貼り付ける 3 2022/09/10 07:55
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/21 13:29
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/02/21 11:19
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
エクセルのxls形式からxlsx形式...
-
フォルダ内のブック全部にパス...
-
VBAでワークブックの名前を変数...
-
エクセル 複数ファイルの一括...
-
vlookup関数の引数を変数で指定...
-
accessフォルダを移動したらフ...
-
エクセルVBA ユーザーフォーム...
-
Excel:上書き保存時にワークシ...
-
エクセルファイルを開く時、関...
-
ACCESS VBAでファイルを開くダ...
-
エクセルのシートの数を数えた...
-
フォルダ内のexcelファイルを順...
-
【VBA】フォルダ内のファイル全...
-
vba初心者です。 質問です。 毎...
-
エクセルファイルをHTML化する...
-
VBAで開いているファイルの...
-
Excelファイルに書かれた文書の...
-
Excel VBA でファイルが開かれ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
フォルダ内のexcelファイルを順...
-
VBAでワークブックの名前を変数...
-
エクセル(マクロ)のファイル...
-
エクセルのxls形式からxlsx形式...
-
エクセル 複数ファイルの一括...
-
エクセルのシートの数を数えた...
-
【マクロ】名前を保存する際に...
-
【Excel VBA】ファイル名が一...
-
ファイルを開かずにマクロを実行
-
accessフォルダを移動したらフ...
-
フォルダ内のブック全部にパス...
-
vlookup関数の引数を変数で指定...
-
Excel VBA でファイルが開かれ...
-
ファイルの保存場所を変えたら...
-
Accessのaccdbファイルを起動で...
-
リンク切れチェックを行うマクロ
-
エクセルマクロ 異なるファイ...
-
データ参照先が別ファイルの場...
おすすめ情報