No.5ベストアンサー
- 回答日時:
#1です。
下記を各シート上のボタンに登録。
個人的な意見ですが、内容が分かってから使われた方が良いかと。
Sub test()
Dim i As Long
Dim k As Integer
Dim j As Variant
j = Array("B10", "E10", "G10")
i = Sheets("集計").Range("C65536").End(xlUp).Offset(1).Row
For k = 0 To 2
Sheets("集計").Cells(i, 3).Value = ActiveSheet.Range(j(k)).Value
i = i + 1
Next k
End Sub
No.4
- 回答日時:
#1です。
>VBAを使ってもできないでしょうか?
質問で書かれている通りにしてみましたが・・・。
こういうことなのでしょうか?
Sub test()
Dim i As Long
Dim m As Integer, k As Integer
Dim j As Variant, l As Variant
j = Array("B10", "E10", "G10")
l = Array("A社", "B社", "C社")
For m = 0 To 2
i = Sheets("集計").Range("C65536").End(xlUp).Offset(1).Row
For k = 0 To 2
Sheets("集計").Cells(i, 3).Value = Sheets(l(m)).Range(j(k)).Value
i = i + 1
Next k
Next m
End Sub
この回答への補足
ありがとうございます。こんな感じなのですが、毎月どのシート(A社、B社、C社)の登録があるかわからないので、それぞれ登録ボタンを作って、シート毎に登録をしたいのですが、可能でしょうか?A社の登録ボタンを押したらA社のみ、B社の登録ボタンを押したらB社のみが集計シートに追加されるという感じです。
補足日時:2006/04/05 10:53ありがとうございます。こんな感じなのですが、毎月どのシート(A社、B社、C社)の登録があるかわからないので、それぞれ登録ボタンを作って、シート毎に登録をしたいのですが、可能でしょうか?A社の登録ボタンを押したらA社のみ、B社の登録ボタンを押したらB社のみが集計シートに追加されるという感じです。
No.3
- 回答日時:
自動では無理です。
シート名を
「A社」「B社」「C社」「集計」
とした場合
「集計」のC4に
=A社!B10
と入力すると
「A社」のB10が「集計」のC4に表示されると思います。
他のセルも同様です。
No.2
- 回答日時:
ご期待と相違していましら無視して下さい。
1.コピー元セルを選択した状態(2番目以降のセルをCTRLキー押下しながら選択)のセル上で右クリックしてコピー
2.コピー先シートの対象セル上で右クリックして形式を選択して貼り付けで「値」と「行列を入れ替える」を選択して実行
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 複数セルデータを別シートの単一セルにコピーしたい。(詳細をご参照ください) 1 2022/12/14 15:08
- Visual Basic(VBA) シート間で同じ値があったら指定範囲をコピーして貼り付け 1 2022/11/07 08:01
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Excel(エクセル) シート参照を含む数式を連続コピー 3 2022/12/10 11:42
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 11:55
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 1 2023/02/27 22:21
- Excel(エクセル) 前の(左隣の)シートを連続参照するように、あとから変更したい 1 2023/02/22 00:51
- Visual Basic(VBA) VBAを使いシート間で貼り付け 3 2023/03/14 20:53
- Visual Basic(VBA) 複数シート一括作成後に、特定範囲の数式は値で貼り付けしたい 3 2022/10/07 11:18
- Visual Basic(VBA) 範囲を指定して別シートにコピペ 2 2022/09/15 07:32
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ピボットテーブルでは時間の表...
-
エクセルで特定の色の数字だけ...
-
【エクセル】オートフィルタで...
-
VBAで重複する項目を1つにまと...
-
ピボットを更新すると数式が入...
-
ピボットの集計方法「合計」初...
-
VLOOKUP関数とCOUNT関数等の組...
-
ピボットテーブルで同じデータ...
-
いい機能だけど、毎回めんどく...
-
EXCEL 重複データの集計の仕方
-
エクセルのSUM関数
-
EXCELで項目ごとの金額を合計す...
-
エクセルで集計
-
エクセル2000 ID別・週別に集...
-
エクセル 条件を満たす最大値...
-
アンケートの集計
-
エクセルのピボットテーブルで...
-
EXCELで増減率を計算したいです
-
SUBTOTALが変わってしまいます。
-
複数のピボットテーブルを一括...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【エクセル】オートフィルタで...
-
エクセルで特定の色の数字だけ...
-
ピボットテーブルでは時間の表...
-
フィルタをしても最下行を常に...
-
VBAで重複する項目を1つにまと...
-
ピボットの集計方法「合計」初...
-
アンケートの集計
-
ピボットを更新すると数式が入...
-
エクセルの小計を自動的に色づ...
-
エクセル、リソース不足エラー...
-
EXCELで増減率を計算したいです
-
EXCEL 重複データの集計の仕方
-
excelで集計の合計を降順に並べ...
-
VLOOKUP関数とCOUNT関数等の組...
-
ピボットテーブルで同じデータ...
-
常にタイトル行と合計行を表示...
-
いい機能だけど、毎回めんどく...
-
Excelの集計結果だけをコピー貼...
-
EXCELで0を除いた平均値...
-
ピボットテーブルのページエリ...
おすすめ情報