日付を確定で入れるマクロを作った。
よく資料の一覧表を作るときでも、例えばAという資料作成日、や更新日に今日の日付をいれるときに、今日は何日か?と思うときがあるわけだ。これを自動でいれれないか?と考えたToday,Now関数は、シートを呼び出した日時にかわってしまうからだめ。と思ってたところValueは、式ではなく数値で入るというのを知って、では、どっか一つのセルにはNow関数で今日の日付を自動で表示して、選択したセルにそのセルの式ではなく、値をいれるマクロを作ればいいだろう。てなことで、まず、選択したセルの値をいれるマクロがすでにうかばんかったがおそらく、ActiveCellだろう、、、といれて、Activecell.valueにしたらそれはあった。でも、ActiveCell.Value = Range("B1").Valueでよさそうなもんなのに、それが、なぜか、一回目エラーになり、二回目動かすとできる。で、もしや、と思ってWorksheets("シート名").Activateをつけたしたら成功。いや、けっこうよくわからんとこにミスがあるもんだね。これは、けっこう使えますよ。まあ、これは個人マクロブックではなく、そのブックに保管しないとだめだが。ボタン一発で今日の日付が値で入る。シート名はその名のとおりシート名。B1はたまたまこれではそうだが、NOW()関数をいれたセル。是非使ってみてください。Sub 日付()Worksheets("シート名").ActivateActiveCell.Value = Range("B1").ValueEnd Sub