一覧表から日記帳へ自動転記

質問

エクセルで日記帳（３６５日＝３６５シート）作りたい
エクセル２０１０使用です。１シート、１日で３６５シート作成したいです。２点アドバイスお願いします。

１点目はシートコピーです。１枚目のシートに３６５シート共通の内容記述してあります。一度に３６５シート分コピー可能な方法。

２点目は、シート名の変更です。オートフィルのようなものはないのでしょうか。現在は１シートずつ名前変更の方法しか浮かびません。

3点目は一覧表があります。Ａ１；年月日、Ｂ１；天気、Ｃ１；血圧・・・。このデータを作成したシートに自動転記したい。
現在は1月1日シートの各セルに　＝Ａ２、＝Ｂ２、＝Ｃ２
1月２日シートの各セルに　＝Ａ３、＝Ｂ３、＝Ｃ３と実施しています。

※OKWAVEより補足：「ひかりＴＶのサービスやＩＳＰぷらら」についての質問です。

回答No.2

imogasi · ベストアンサー

1.2.3ともVBAでやれば、苦はない。こういうことに関心がないなら、
ーー
１日づつ前日分をコピー（や次週１週間分）を習慣化すればよいのでは。
ーー
２には、簡単な良い方法が（意外にも）ない。
VBAでやれば簡単だが。
ーー
VBAで、日にちの入った名前のシートを作るなら
Sub test01()
For i = #2/1/2019# To #2/8/2019#
sn = "日記" & StrConv(Format(i, "mmdd"), vbWide)　 '/は使えない Worksheets.Add.Name = sn
Next i
End Sub
を標準モジュールというシートに張り付けて実行すれば、簡単に作れます。
#2/1/2019＃は「XXから」に当たる日付で、#2/8/2019#は、「ｙｙまで」に当たる日付で、その間の、暦にある日付が入ったシート名のシートを作ります。
ただし、シート名には、スラッシュなど特殊記号で使えない文字があります。
表の罫線枠などのコピーは、シート名のタブをSHIFTキーを押しながら、から・までを指定し、コピー貼り付けすれば、貼り付け対象シートの、同じセル範囲に
表（枠と見出しだけとか）が貼りつくのでは。

回答No.1

aokii

1点目：シートの画面左上の◢マーク上で右クリックしてコピー。
2点目：シート名の変更は、オートフィルのような簡単なものはありません。
3点目：1月1日シートの各セルに　＝Ａ２、＝Ｂ２、＝Ｃ２
1月２日シートの各セルに　＝Ａ３、＝Ｂ３、＝Ｃ３とする以外に簡単な方法はありません。