2022.03.30このページではエクセルVBAを使って、以下の画像のようにシート上にカレンダーを一発作成する方法をご紹介していきます。基本的には、コード中で月の開始曜日、月の総日数を指定してあげるだけで簡単に作成できます。資料作成の際にぜひご活用ください。それではさっそくやっていきましょう。※VBAを使ったことがない、という方は以下で始め方を解説していますので、まずはこちらからご覧ください。エクセルマクロ(VBA)の始め方!初心者向けに画像を使って詳細解説スポンサーリンク目次カレンダー作成するサンプルVBAコードカレンダー作成マクロの使い方サンプルコードの実行結果確認おわりにカレンダー作成するサンプルVBAコードそれでは早速ですが、以下がカレンダー作成コードです。Sub※このマクロでは実行時にアクティブなシートのA1セルからG7セルに強制的に上書きするようになっています。実行前は新しいシートを作成してから実行することをオススメします。基本的には指定した情報をもとにゴリゴリfor文を回して作成しているだけですね。(もうすこしうまく作れればいいのですが、いいアイデアが浮かびませんでした。先ほどのマクロの使い方を解説しておきます。7行目にて、週の曜日を指定します。今回は日曜日から始まるように書いていますが、ここは月曜日から始まるようにしても問題なく動作します。次に9行目にて、作成したいカレンダーの初日の曜日を指定してあげます。最後に11行目で月の総日数を指定してあげましょう。ここまでできたら、開発タブ⇒マクロ⇒make_calenderを選択⇒実行で実行します。これでマクロ実行時のアクティブセルのA1セルからG7セルにカレンダーが作成されているはずです。以下の設定で、2022/4のカレンダーを作成してみました。30問題なく作成できていますね。ついでに2022/5のカレンダーも作成してみました。31こちらも問題なく作成できていますね。スポンサーリンクおわりにというわけで今回は、エクセルVBAをつかって簡易的なカレンダーを作成する方法をご紹介しました。業務効率化にご活用ください。このように、私のブログではエクセルスキルはもちろん、様々なプログラミングスキルを紹介しています。今は仕事中で時間がないかもしれませんが、ぜひ通勤時間中などに他の記事も読んでいただけると嬉しいです。⇒興味をもった方は【ヒガサラ】で検索してみてください。確実にスキルアップできるはずです。最後に、この記事が役に立ったという方は、ぜひ応援よろしくお願いします。コピーヒガシをフォローするスポンサーリンクヒガシヒガサラblogスポンサーリンクエクセルVBA【VBA】指定したファイルを名前を変えながら一括コピーする方法!この記事では、VBAを使って指定したファイルを大量コピーする方法をご紹介しています。面倒なコピー作業は自動化していきましょう。入れる方法を解説!この記事では、指定した領域に格子線や太線、斜線を入れるVBAコードをご紹介しています。一行で済みますので、ぜひご活用ください。エクセルVBA【エクセルVBA】シート上の図形を画像として保存(出力)する方法!このページではVBAを使って、エクセルシート上の図形をjpg画像ファイルとして出力する方法をご紹介していきます。※単体の図形に対してはもちろんのこと、グループ化されている図形に対しても実行可能です。それではさっそくや...エクセルVBA【エクセルVBA】指定フォルダ内ブックを一括で読み取り専用に変更する方法!このページではエクセルVBAを使って、指定フォルダ内にあるすべてのブックを一括で読み取り専用ファイルに変更する方法をご紹介していきます。ひとつひとつ作業していたら膨大な時間がかかると思いますので、ぜひ以降で紹介するV...エクセルVBA【VBA】IF文の条件に応じて処理を停止する方法!ExitSubの使い方!VBA実行中に、ある条件にあてはまった場合に処理を停止したい。それならIF文の中に、あるコードを差し込むだけで解決ですね。コメントをキャンセルメールアドレスが公開されることはありません。※サイト次回のコメントで使用するためブラウザーに自分の名前、メールアドレス、サイトを保存する。上に表示された文字を入力してください。ご指摘ありがとうございます。修正させていただきましました。【python-openCV】背景画像に別の画像を合成する方法!やぎ2023.05.29こんにちは。書く必要があると思います。【python-openCV】背景画像に別の画像を合成する方法!サトシ2023.05.11承知しました。アドバイス本当にありがとうございます。【VBA】大量のファイル名変更!指定したフォルダ内を一括操作!ヒガシ2023.05.11/はフォルダの階層が変わることを意味しますので使えません。substitute関数などを使って別文字に変換してから実行すると良いと思います。【VBA】大量のファイル名変更!指定したフォルダ内を一括操作!サトシ2023.05.10何度もすみません。/を使うと出来ないみたいです。2001-001-1/4とかにしたいのですが、ファイルが見つかりませんとかパスが無効ですとなります。検索タイトルとURLをコピーしました。