データの貼り付け作業について

質問

シート１シート２シート３シート４シート５シート６まであるとします。
それぞれシートに氏名　数値１　数値２　数値３とあり
シート１は田中　１　２　３　シート２は田中　３　２　１　というデータが入っていたとします。
シート２のデータをコピーしてシート１に形式を選択して貼り付け（加算）を行い
シート１のデータは田中　4　4　4　となります。
これで1作業終わります。
次に同じようにシート４のデータをコピーし、形式を選択して貼り付け（加算）でシート３に貼り付けます。
こいう作業を結構な回数行う必要があるのですが、なにか楽にできる方法はないでしょうか。

回答No.3

imogasi

内容が珍しく質問がわかりにくい。説明では（以下Ｓはシートと思ってください。＋は加算貼り付けのつもり。また対応するセルについてやるものとする）
Ｓ１（Ａ１）＋Ｓ２（Ａ１）ー＞ｓ１（Ａ１）
Ｓ３（Ａ１）＋Ｓ４（Ａ１）－＞Ｓ３（Ａ１）
Ｓ５（Ａ１）＋Ｓ６（Ａ１）－＞Ｓ５（Ａ１）
を出すのか？こういうルール（手順）らしい。
ーーー
＞結構な回数
各行（多数行）について上記を行うのか
ーーー
シート１の空き列にＳ１＋Ｓ２
シート３の空き列にＳ３＋Ｓ４
シート５の空き列にＳ５＋Ｓ６
を関数で計算してはダメなのか。
もちろん式複写を利用する。
ーーー
質問の課題は、２シート間の加算（３種）というようには捉えられないのか？
ーーー
コピー貼り付けを離れて、データの中身はどういうものか。
加算貼り付けは、質問者の思い付きではないのか。
他の方法でできないか？
＝＝＝
質問の作業がめんどくさい場合はＶＢＡによることになる。
エクセルでは繰り返し回数が多いならＶＢＡを検討するほかない（原則）。
ＶＢＡは経験あるのですか。
マクロの記録を改善する力はありますか。
参考　1回分は
Sub Macro1()
Sheets("Sheet2").Select
Range("A1:D1").Select
Selection.Copy
Sheets("Sheet1").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlAdd, SkipBlanks:= _
False, Transpose:=False
End Sub

回答No.2

noname#99913

どのシートも同じセル番地に田中さんがあるのなら、

合計用シートを作り、

A1　→　=Sheet1!A1
B1　→　=SUM(Sheet1:Sheet4!B1)

と入力し、B1を右へ必要なだけコピー、この行を下へ必要なだけコピー

回答No.1

chonami

すべてのシートの田中さん（他）の各データ（数値1、2…）を加算したいということですか？

では、データ→統合機能をお調べ下さい。