2つのBOOKの連動の仕方について教えてください。
EXCEL2003を使用しています。
〔売上〕BOOK
〔1月〕 sheet
A店 B店
売上 累計売上 昨年売上 昨年累計
1日 500 500 700 700
2日 600 1,100 800 1,500
3日
で入力した金額を
〔合計表〕BOOK
〔1月合計〕 sheet
1日売上 累計売上 昨年売上 昨年累計
A店 500 500 700 700
B店
C店
2日売上 累計売上 昨年売上 昨年累計
A店
B店
C店
のBOOKに連動させたいです。
それぞれのBOOKに、12ヶ月間のシートがあり、店は10店舗ほどあります。
〔合計表〕のほうに
=SUM('[売上.xls]1月'!$B$4)と入力してみましたが、
2月になったときに1月の部分をすべて直していくのは時間がかかります。
どのようにするのがベストでしょうか?
No.1ベストアンサー
- 回答日時:
こんにちは
一つある方法は、マクロを組むことでしょうか?
簡単なマクロの組み方としては
合計表のところで
ツール → マクロ → 新しいマクロの記録 → ×××× → 記録終了
×××のところは、何をしたいか?したいことをその通りに入れてみると簡単にマクロを組むことが出来、参考のようなものが自動的にできます。挑戦してみていかがでしょうか?
作成する表は
店舗別〔売上〕BOOK
A店舗 1月 2月 3月 ・・・・・・・・・・ Sheet1~Sheet12まで
B店舗 上記と同じく
合計表 BOOK
〔1月合計〕 sheet1 1日
1日売上 累計売上 昨年売上 昨年累計
A店 500 500 700 700
B店
C店
sheet1 2日
2日売上 累計売上 昨年売上 昨年累計
A店
B店
C店
Sheet32 合計シート
実行するときは、 ツール → マクロ → マクロ → 実行
参考 (自動的にできます)
Sub Macro3()
'
' Macro3 Macro
' マクロ記録日 : 2011/1/24 ユーザー名 :
'
'
Windows("A店舗.xls").Activate
Range("B2:E2").Select
Selection.Copy
Windows("合計表.xls").Activate
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("B店舗.xls").Activate
Range("B2:E2").Select
Application.CutCopyMode = False
Selection.Copy
Windows("合計表.xls").Activate
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("c店舗.xls").Activate
Range("B2:E2").Select
Application.CutCopyMode = False
Selection.Copy
Windows("合計表.xls").Activate
Range("B4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
No.2
- 回答日時:
こんにちは
マクロに挑戦見てください
判らないことが生じましたらいつでもご連絡ください。
チョット時間を要しますが、一つできると後は中身は全く一緒なんですよ。
小さなもので作成してみてから作るといいですよ。
例えば、印刷のマクロとかなんか役に立ちますし、短いマクロでできますよ。
頑張ってみてください。決して難しいと思わないで・・・・・・・・
hanakogure
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
絶対にいけるWindowsXPsp3の無...
-
Windows XP SP3のインストール...
-
WindowsXPを最近のパソコンに...
-
シムズ4(PS4版) マイライブラリ...
-
フリープリントソフト「かんた...
-
パソコンでCDを見たい、見る...
-
条件付き書式の結果につて
-
Windows アカウント名 とは?
-
ピクチャーが無くなった
-
Windows xpにWindows10を無理や...
-
パソコンで一定の文字数を打つ...
-
WindowsXPのプロダクトキーを紛...
-
エクセルでの文字入力がIMEでし...
-
Windows10 32ビットから64ビッ...
-
パソコン起動時に2つのユーザー...
-
WindowsXPが起動しなくなったと...
-
平仮名変換
-
セーフモード解除
-
Windows11のPCの、ショートカッ...
-
XPが起動しない、バックアップ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
絶対にいけるWindowsXPsp3の無...
-
Windows XP SP3のインストール...
-
WindowsXPを最近のパソコンに...
-
シムズ4(PS4版) マイライブラリ...
-
アウトルックを「タスクバー」...
-
パソコンでCDを見たい、見る...
-
WindowsXPのプロダクトキーを紛...
-
Windows xpにWindows10を無理や...
-
最近、パソコンを起動するとこ...
-
プロダクトキー
-
エクセルでの文字入力がIMEでし...
-
やっぱり現代のPCにWindowsXPを...
-
パソコンで一定の文字数を打つ...
-
フリープリントソフト「かんた...
-
ラズパイでwindows XPは動くのか
-
OphcrackがWindowsVistaでブー...
-
パソコン起動時に謎のエラー画...
-
パソコンが操作できなくなりま...
-
XPが起動しない、バックアップ...
-
HDDがフォーマット出来なくなった
おすすめ情報