月ごとの出勤簿のようなものを作成しています。
月が変わったらマクロボタンで次月(ボタンを押した当月)のシートが作成されるようにしたいのですが、累計を出したいセルへの計算式の設定でつまづいています。
各行に出勤者、各列に日にち、表の右端の列に合計・累計という表があり
ボタンで表のコピー、日付の変更、当月までの累計値の計算式を設定、としたいのですが、1つ前のシート名を変数に置き換えて参照先を指定??このシートまで、という指示を出す?と自分の思うようなコードをかけるほど理解が深くありません。
どなたかお力添えを頂ければと思います。
以下、現在動かしているマクロのVBAです。
なお合計欄(AI列)にはCOUNTIF関数での計算式が入っており、1人あたりの出勤数累計を求める式はAJ4〜AJ28へそれぞれ設定したいです。
Sub シートコピー()
' バックグラウンドで作動
Application.ScreenUpdating = False
' シート名用の変数定義
Dim D As String
' シート名を今日の年月に設定
D = Format(Date, "YY年MM月")
' アクティブシートをコピーして右側に配置
ActiveSheet.Select
ActiveSheet.Copy After:=ActiveSheet
' B1に今日の年を入力
Range("B1").Value = Year(Date)
' B2に今日の月を入力
Range("B2").Value = Month(Date)
' リスト範囲の値と数式をクリア
Range("D4:AH28").Select
Selection.ClearContents
' 新シートに設定した名前を付ける
ActiveSheet.Name = D
' 1日の先頭セルへ移動
Range("D4").Select
End Sub
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
>1人あたりの出勤数累計を求める式はAJ4〜AJ28へそれぞれ設定したいです。
ようは
https://www.becoolusers.com/excel/3d.html
これの事?
仮に4~5月のシートがあって6月に実行したとき、その目的のセルに入る式は『4~5』?『4~6』?
あとついでに、
> ' バックグラウンドで作動
確か違うでしょ。
画面の更新をしないだけでバックグラウンド処理ではないと思うよ。
初級者なので自信ないですがExcelにその機能はなかったかと。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) ②Excel 簡単にシートコピーしたら前日の残高と日付を変更させたい→マクロの記録でエラーが出ます 8 2022/07/16 20:40
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Excel(エクセル) ワードのマクロについて教えてください。 1 2023/03/11 13:50
- Visual Basic(VBA) EXCELのVBAについて 2 2023/07/05 17:17
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) 複数シート一括作成後に、特定範囲の数式は値で貼り付けしたい 3 2022/10/07 11:18
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/03/08 09:08
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/06/01 14:45
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
VBAの天才来てください
-
【ExcelVBA】全シートのセルの...
-
ユーザーフォームに入力したデ...
-
エクセルのマクロでアクティブ...
-
VBA 存在しないシートを選...
-
同じ作業を複数のシートに実行...
-
ExcelのVBAのマクロで他のシー...
-
エクセルのシート名変更で重複...
-
【VBA】シート名に特定文字が入...
-
【VBA】色のついたシート名を取得
-
ExcelVBA:複数の特定のグラフ...
-
ExcelVBA シート名を複数セルか...
-
XL:BeforeDoubleClickが動かない
-
VBAを用いて繰り返し自動的...
-
excelのマクロで該当処理できな...
-
VBA ユーザーフォーム上のチェ...
-
Excel マクロについての相談
-
特定の文字を含むシートだけマ...
-
エクセル・マクロ シートの非...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
同じ作業を複数のシートに実行...
-
ExcelVBA シート名を複数セルか...
-
【ExcelVBA】全シートのセルの...
-
Excel マクロについての相談
-
VBA 存在しないシートを選...
-
実行時エラー'1004': WorkSheet...
-
特定の文字を含むシートだけマ...
-
ExcelのVBAのマクロで他のシー...
-
ブック名、シート名を他のモジ...
-
XL:BeforeDoubleClickが動かない
-
VBA 複数の各シートに行を追加...
-
エクセルのシート名変更で重複...
-
【Excel VBA】Worksheets().Act...
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
for 文の 繰り返し処理に使える...
おすすめ情報