ポイント
- Worksheet.UsedRange プロパティを利用して最大行数・最大限を取得する。
- 書式やデータが入っていなくても過去に編集のあったセルも対象となる。
- 過去に編集があったセルは [削除] すれば対象から外れる。
Windows や Office など、Microsoft 社関連の話題ですわ♪
シートをすべて選択してウインドウ枠の固定を解除操作をしてみましたけれども、現在のシートのみしか解除されておりませんでした。。。
残りの何十何百のシート、ひとつひとつ丁寧に解除、、、辛いです><。。。
ActiveWindow.FreezePanes
で設定する。ActiveWindow.FreezePanes
は Active なシートに設定される。Atom が自動アップデートされましたの。
すると、右クリックの [Open with Atom] を選択しても [アプリケーションが見つかりません] とエラーとなってしまいました><。
以前インストールした Visual Studio Code。
アンインストールしても右クリック時の [Open with Code] が消えておりませんでした><。
試しに実行してみると、[アプリケーションが見つかりません] とエラーとなりましたの。
久しぶりに使ってみようと思ったこともあり、再インストールすれば上書きされて有効になるかしらと思いました。ところが、[Open with Code] がもうひとつ増えただけでしたわ><。
不要な [Open with Code] を削除したいですの!
Format(y & "/1/1", "e")
→ y & "/1/1"
: y に 4 桁の西暦年が入って年月日となる。"e"
: 和暦の年を指定するフォーマットPublic Sub Test() Dim y As String: y = "2016" Debug.Print "和暦年数字: " & Format(y & "/1/1", "e") End Sub
和暦年数字: 28
学年を求めるためには、4月1日時点で何歳か?、を算出する必要がごさいます。
例えば、次のようになります。
これを、基準日と誕生日を渡してやれば算出してくれる VBA を書きました♪
の改善版ですわ♪
の改善版!