Excelについての質問です。
シートを「入力」と「データ」に分けており、入力シートには、その日一日分のデータが入力できるようにしています。(※この作業自体は、すでにマクロで自分のイメージ通りに入力できるようになっています。)
ここで皆さんのお知恵をお借りしたいのですが...
日付が変わった時に、自動的に入力シートのデータをデータシートに転記し、データを一日分ごと(365日分)に、データシートに蓄積していきたいと考えております。
また、入力シートは、日付が変わった時に、自動的にデータが0になるようにリセットできるようにしたいのですが、これら2つの作業を可能にする数式やマクロを、どのようなものにすればよいかわかりません。どなたか良いお知恵を授けていただけますとありがたいです。
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
>日付が変わった時に、自動的に入力シートのデータをデータシートに転記
>し、データを一日分ごと(365日分)に、データシートに蓄積していきた
>いと考えております。
一般的には、一日の入力作業が終わったら
ボタンを押して、入力したデータが蓄積のシートのデータがある最終行の
下に移動して、入力シートをクリアすると思うのですが。
こちらでは駄目なのでしょうか。
No.2
- 回答日時:
》 数式やマクロを、どのようなものにすればよいかわかりません
そういう人に「知恵を授け」たぐらいでは・・・
貴方、大丈夫ですかぁ?「知恵を授けていただけますとありがたい」なんて、仰っているけど。
No.1
- 回答日時:
こんにちは!
表の具体的なレイアウトが判らないので、やり方だけ・・・
VBAになりますが一例です。
両シートとも1行目が項目行になっていて、日付列がA列だとします。
>日付が変わった時に、自動的にデータが0になるようにリセットできるようにしたいのですが
というコトですので、「入力シート」の2行目以降のデータはコピー&ペースト後消去するようにしています。
(万一数式が入っている場合は数式も消去されますので、気を付けてください)
Alt+F11キー → VBE画面左下にある「ThisWorkbook」をダブルクリック → VBE画面のカーソルが点滅しているところに
↓のコードをコピー&ペーストしてみてください。
Private Sub Workbook_Open()
Dim lastRow As Long, lastCol As Long
Dim myRng As Range, wS As Worksheet
Set wS = Worksheets("データ")
With Worksheets("入力")
If Date <> .Range("A2") Then
lastRow = .Cells(Rows.Count, "A").End(xlUp).Row
lastCol = .Cells(1, Columns.Count).End(xlToLeft).Column
Set myRng = Range(.Cells(2, "A"), .Cells(lastRow, lastCol))
myRng.Copy wS.Cells(Rows.Count, "A").End(xlUp).Offset(1)
myRng.ClearContents
End If
End With
End Sub
これでファイルを開いたときに
開いた日付と「入力」シートのA2セルの日付が違う場合に
「入力」シートの2行目以降のデータが「データ」シートのA列最終行以降に
コピー&ペーストされているはずです。m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
TODAY()で設定したセルの日付が変わったらマクロを実施させたい
Visual Basic(VBA)
-
エクセル 日付が変わると同時にセルを空にしたいです
Excel(エクセル)
-
毎日の日計を別シートに自動で更新、反映させたい
PowerPoint(パワーポイント)
-
-
4
excel vbaで日付一致の行にデータ転記
Excel(エクセル)
-
5
VBA 別シートの同じ日付の欄に値を貼付け
Excel(エクセル)
-
6
エクセルを利用して、日計と累計を毎日作成する方法
Excel(エクセル)
-
7
エクセルで日毎のデータの蓄積
Excel(エクセル)
-
8
エクセル 指定した月のデータを自動的に反映させられる方法
Excel(エクセル)
-
9
エクセルのVBAで日付を検索し転機したい
Visual Basic(VBA)
-
10
月が変わったら自動でシートが複製される方法を教えてください。
Visual Basic(VBA)
-
11
エクセルで、月によって参照するシートを自動的に変える関数
Excel(エクセル)
-
12
本日の日付とマッチした列の値を抽出
Excel(エクセル)
-
13
エクセル 日数が増えるたびに数値を増やしたい
Excel(エクセル)
-
14
特定セルの内容を更新したら、その更新日を自動的に表示する方法について
Excel(エクセル)
-
15
入力後に日付順になるように自動で並び替えしたいのです。
Excel(エクセル)
-
16
ファイルのオープン時に今日の日付にジャンプ
Excel(エクセル)
-
17
エクセルで入力→日付を自動判別して、その日付用のセルに転記したい
Excel(エクセル)
-
18
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
19
今日の日付が入った行のデータを取得するマクロ
Excel(エクセル)
-
20
エクセルで、日付を入力すると、別のセルに文字を自動的に表示させるようにするには。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
excelの不要な行の削除ができな...
-
エクセルファイルのシート毎の容量
-
複数シートからデータを拾って...
-
Excelでシートの違うデータでグ...
-
シート削除して同名シート追加...
-
【エクセルマクロ】複数シート...
-
VBAで CTRL+HOMEの位置へ移動...
-
EXCELで2つのファイルから重複...
-
エクセル マクロ "特定の日付...
-
オートフィルタで抽出したデー...
-
【Excel】マクロでグラフ系列に...
-
EXCEL の表を一行ずつシートに...
-
Excelで日付変更ごとに、自動的...
-
ユーザーフォームで別シートを...
-
重いExcelファイルのことで教え...
-
時間帯の重複を除いた集計について
-
ExcelマクロのSendkeysで処理途...
-
EXCEL VBA 担当者毎にファイル作成
-
エクセル 縦に長い表の印刷時...
-
データベースから呼び出して、...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
excelの不要な行の削除ができな...
-
エクセルファイルのシート毎の容量
-
複数シートからデータを拾って...
-
Excelでシートの違うデータでグ...
-
シート削除して同名シート追加...
-
EXCELで2つのファイルから重複...
-
VBAで CTRL+HOMEの位置へ移動...
-
トランジスタの選び方
-
Excelで日付変更ごとに、自動的...
-
他のシートの一番下の行データ...
-
エクセル マクロ "特定の日付...
-
【エクセルマクロ】複数シート...
-
エクセル VBA VLOOKUP
-
時間帯の重複を除いた集計について
-
エクセル 縦に長い表の印刷時...
-
エクセルで名簿を50音で切り分ける
-
Excelマクロ 差分抽出の方法が...
-
エクセルのカメラ機能について
-
EXCEL 複数行のデータを1行にま...
-
Excel 売上管理シートに入力し...
おすすめ情報