今回は、Excelの機能である「VLOOKUP関数」についてサンプルを交えて紹介します。

みみねこ

VLOOKUP関数はとても便利な機能ですが、使い方を間違えると痛い目を見ます。

是非、基本の使い方から注意事項までご確認ください！

基本的なVLOOKUP関数の使い方

VLOOKUP関数は、①検索対象を②ある場所（範囲）で探し、④存在すれば（もしくは近似値があれば）その行にある③指定列の値を返す関数です。

VLOOKUP関数の引数は以下になります。
⇒VLOOKUP(①,②,③,④)

VLOOKUP関数は、
・複数のシートにまたがっているデータを必要な情報のみ１つのシートにまとめる
・システムからcsv形式で抽出した複数のデータを必要な箇所のみ抜き出し分析する
などなど、使いやすい関数なので知っていて確実に損のない機能です。

この関数は第4引数によって使いどころが異なるので、次項からは分けて説明していきます。

第4引数が「0/FALSE（完全一致）」の場合

検索対象が存在した場合に、値を返します。存在しなければ「#N/Aエラー」を返します。

例：商品販売記録

商品の販売記録を管理する帳簿です。
商品テーブルに商品の情報を入れ、商品販売記録にて販売代金を管理しています。

値段のD5セルに
「=VLOOKUP(C5,$I$5:$K$9,3,FALSE)」を入れ、その後列にコピーしています。

これで、商品名を入れると値段を引っ張ってくることができるようになりました。

例：健康診断の通知

社員リストのデータを元に、健康診断の通知文書を作成します。

・健康診断シート

・通知文書

印刷Noを変えるとそれぞれの値が変わるように、
C3→「=VLOOKUP($G$2,社員リスト!$A:$G,2,FALSE)」
C4→「=VLOOKUP($G$2,社員リスト!$A:$G,3,FALSE)」
C5→「=VLOOKUP($G$2,社員リスト!$A:$G,4,FALSE)」
C9→「=VLOOKUP($G$2,社員リスト!$A:$G,5,FALSE)」
C10→「=VLOOKUP($G$2,社員リスト!$A:$G,6,FALSE)」
と、入れています。

これで、印刷Noを変えるだけで通知対象を変えることができるようになりました。

第4引数が「1/TRUE（近似値）」の場合

検索対象が存在した場合に、近似値を返します。

近似値というのがミソで、
検索範囲内の上から順に見ていって検索対象が見つからなければ、検索対象以下の行をとってくる性質があります。
上から順にみるため、検索する範囲が必ず昇順（小さい順）に並んでいる必要があります。

また、検索対象以下の値が存在しなければ「#N/Aエラー」を返します。

例：成績管理

点数に対してS～Eまでの評価をつけるパターンです。

D3に「=VLOOKUP(C3,$F$3:$I$8,4,TRUE)」と入れて、列にコピペしてます。

これで、点数の値によって自動で評価をつけられるようになりました。

#N/Aエラーの対処方法

検索対象が見つからない等で「#N/A」エラーが出たときの対処方法です。

この対処にはIFERROR関数を使います。
⇒IFERROR(①,②)

例えば、以下のようになります。

=VLOOKUP(C5,$I$5:$K$9,3,FALSE)
↓
=IFERROR(VLOOKUP(C5,$I$5:$K$9,3,FALSE),”※商品テーブルにありません”)

エラー内容が一目でわかるようになりましたね。

注意事項

VLOOKUP関数は、よく知らず使うと必ず痛い目を見ます。
よく注意して使うようにしてください！

第4引数のTRUEとFALSEに注意する

一番気を付けて欲しいのがこちらです。
内容は前述の通りで、動作が全く異なるため注意してください！

第2引数の検索する場所（範囲）は必ず固定しておく

下部のセルへコピペする際に範囲がずれてしまうので、必ず値を$をつけて固定してください。

例えば、以下のように$を付けてください。
（第２引数にカーソルを当ててF4を押すとまとめて$をつけれます）
VLOOKUP(C5,I5:K9,3,FALSE)
↓
VLOOKUP(C5,$I$5:$K$9,3,FALSE)

第4引数は省略しない

第4引数は省略すると、基本的には「1/TRUE（近似値）」になります。

分かっていてやっているのであればまだいいのですが、
前述のとおりFALSEとTRUEでは動きが異なり、TRUEだと近似値をとるので、結果を見ても気づきにくいです。

また、省略の仕方（第4引数の「,」の有無）によってTRUE、FALSEが変化するようで、

VLOOKUP(C5,$I$5:$K$9,3)　→　TRUE（近似値）
VLOOKUP(C5,$I$5:$K$9,3,)　→　FALSE（完全一致）
となります。

なので、TRUEであっても省略しない方が安全かと思います。

第4引数がTRUEの時、検索する範囲が昇順であること

前述の通り、
TRUE（近似値）だと「検索対象以下の値をとる」ため、昇順でないと正しい値が出ません。

今回の記事は以上です。
何かの参考になれば幸いです。ありがとうございました♪

投稿 【EXCEL】VLOOKUPの使い方（1と0の違い、#N/Aエラー等） は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

CSVファイルをExcelで確認すると文字化けすることはありませんか。
それは文字コードがUTF-8のBOM無しで作成されているからかもしれません。

UTF-8とは文字コードの一種です。
本記事ではUTF-8、UTF-16等のファイルでBOM付き、BOM無しの違い、BOM有無の確認方法、作成方法についてご紹介させていただきます♪

BOM付き、無しの違いについて

まずBOMの話を進める前にUnicodeとUTF-8、UTF-16、UTF-32の話を少しします。

UnicodeとUTF-8、UTF-16、UTF-32とは

ここでは簡単に話をしますが、

Unicodeとは世界中の様々な文字を集めた定義（符号化文字集合）のことです。

UTF-8、UTF-16、UTF-32はUnicodeを符号化して文字コード（符号化方式）が設定された状態です。
要は番号が振られています。この番号の振り方が異なるのでUTF-8、UTF-16、UTF-32があります。

また、UTF-16とUTF-32にはコンピュータの構造によってエンディアン（バイトオーダー）方式が異なります。

BOMとは

BOMの説明に戻りますが、BOMというのはバイトオーダーマーク（byte order mark）といい、ファイルの先頭に付与されます。
※ メモ帳等のテキストエディタで開いて目視で確認することはできません。

このBOMの値を見てUTF-16、UTF-32エンディアンを判定します。

みみねこ

…ん？ということはもしかしてUTF-8にはBOMは必要ない？

UTF-8はエンディアン方式の違いはないので本来BOMは必要ありません。

しかし、アプリ（プログラム）によっては文字コードをUTF-8と判断できず、文字化け等の不具合を起こすことがあります。
※ Microsoftのアプリ（Excel、メモ帳）で多い

また逆にBOM付きを想定されていないアプリ（プログラム）では、不具合を起こす場合があります。
※ Webページの開発で使われるhtmlやPHPではBOM無しでないと動作しない場合がある

そのため、UTF-8ではBOM付き、BOM無しのファイルが存在します。

ファイルのBOM確認方法

ここではBOM有無の確認方法についてご紹介します。

Windowsに標準で入っているメモ帳で確認するのが一番簡単です。

メモ帳での確認方法

ファイルをメモ帳で開いたときに右下に文字コードが表示されます。

ただし、Windowsのバージョンによっては保存することで自動的にBOM付きのファイルで上書き保存してしまうことがあるので注意が必要です。

※ サクラエディタやTeraPadなど他のテキストエディタでも確認できるものもありますので、確認してみてください。

バイナリエディタでの確認方法

正直バイナリエディタで確認する必要はありませんが、どうしても文字コードを見て確認したい場合はバイナリエディタでBOMを確認することができます。

バイナリエディタでファイルを開き、先頭バイトが「EF BB BF」が付いているとBOM付きファイルであることを確認できます。

画像ではフリーソフトの「Stirling」を使っています。

BOM付き、BOM無しのファイルの作成方法

メモ帳での作成方法

メモ帳で「ファイル」→「名前を付けて保存」で画像の画面が表示されるので、画像下部の「エンコード」クリックで

・UTF-8
・UTF-8(BOM付き)

を選ぶことでBOM付き、BOM無しのファイルを作成することができます。

※ サクラエディタやTeraPadなど他のテキストエディタでも作成できるものもありますので、確認してみてください。

補足

先ほど少し出てきましたが、MicrosoftのExcelではBOM無しでは文字化けしてしまいます。

そのため、ファイルをExcelファイルで開いたとき、文字化けが起こっている場合はBOM無しであることを疑ってみてください。
※ ただし半角文字の場合、文字化けを起こさないこともあるので
　文字化けが起こらない ＝ BOM付き とは限らないので注意してください。

※ 別記事でExcelでBOM付きファイルを開く方法をご紹介する予定です。

まとめ

本記事ではUTF-8のファイルについての説明、BOM付き・BOM無しの確認や作成方法をご紹介しました。

アプリによってBOM付き、無しで動く、動かないが異なるので統一されるとファイルが扱いやすくなって良いですね！

投稿 【ファイル】UTF-8のBOM付き、BOM無しの違い・確認・作成について は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

今回は、OfficeのExcel VBAで初心者でも簡単にマクロを作成する方法を紹介します。

Excelのマクロ（VBA）を使ったことがないし、当然プログラミングもしたことがない……
かといって１から勉強を始めるのもハードルが高いなぁ

みみねこ

「マクロの記録」機能で作成したコードを利用すれば、初心者でも簡単にマクロを作成できますよ♪

もちろんプログラミング要素が０とは言いませんが、
ほとんど知識なしでもできてしまう方法ですので、良かったらご参考にしてくださいね。

元となるExcelを作成

まずはマクロを付与する元となるExcelを作成しましょう。

例えば、「健康診断の日程」を社員の人数分印刷するケースです。

以下のように、
まずVLOOKUP関数を利用して「印刷No」を変更するだけで内容を変えられるようにします。
（VLOOKUP関数の使い方については以下を参照してください♪）

【EXCEL】VLOOKUPの使い方（1と0の違い、#N/Aエラー等）

ExcelのVLOOKUP関数について、基本的な使い方として第4引数が「0/FALSE（完全一致）」の場合や「1/TRUE（近似値）」の場合、「#N/A」エラーのIFERROR関数を使った対処方法、使用時の注意事項などサンプルを交えて紹介します♪

nyanblog2222.com

2022.07.18

さて、ここで一つ一つ「印刷No」に値を入れて印刷するを繰り返すのも面倒なので、
From～ToのNoの人へ一括して通知文を印刷したい！とします。

ここで登場するのが処理を自動化させるマクロです。次項から作成方法を説明していきます。

Excelをマクロ形式にする＆開発タブを追加する

前準備としてExcelをマクロ形式にしましょう。

名前を付けて保存する際に、「Excelマクロ有効ブック」を選択して保存します。
こうすることで、ファイルの拡張子が「.xlsm」となり、マクロを保存できるようになります。

次に、もしExcel上部に「開発タブ」が出ていなければ設定してあげましょう。
「開発タブ」からマクロの設定ができます。

「開発」にチェックを入れるとタブが現れます。

「マクロの記録」機能でベースコードを作成

前項までで事前準備もできたため、早速マクロを作成していきましょう。

ただ、いきなりVBAのコードエディタを開き、１からコードを作成……、
なんてことをしてしまうと一気に難易度が高くなってしまうため、
今回はマクロの元となるベースコードを作成するため、Excelの「マクロの記録」という機能を使用します。

「マクロの記録」とは、その名の通りExcelの操作を記録する機能です。

やり方は以下の通り、まず「マクロの記録」をクリックします。

適当にマクロ名を付けて保存します。
（プログラミング言語はアルファベットが基本なので、アルファベットで「動詞＋名詞」のような処理内容がわかる名前がおすすめです）

「OK」を押すと記録が始まるので、記録したい処理を手作業で行います。

今回のケースだと、以下を記録してみましょう。
１．G2の値を変える
２．印刷する

終わったら、記録終了します。

これで記録できました！
マクロボタンをおして、編集を押すと……。

このように、マクロのベースとなるコードができましたね♪

コードを見て、
・G2を選ぶ
・値（2）を入れる
・エンターを押したためG3が選ばれる
・印刷する

という処理内容になっていることがなんとなく分かれば、マクロ作成は難しくありません！
分からなくても、いくつかやっているとなんとなく分かってきますのでご安心を。

また、もし、同じ作業をするだけなら次項のコードの修正は不要なので飛ばしてくださいね♪

コードを適宜修正

前項にてベースコードができましたので、以下のとおり適宜修正していきます。

・G2を選ぶ　→　必要
・値（2）を入れる　→　値にFromToの内容を反映させれるようにする
・エンターを押したためG3が選ばれる　→　G3を選ぶ必要はないため不要
・印刷する　→　必要
◎上記をFromToの間だけ繰り返す！

ここでややこしいプログラミングの知識は一つだけで、「繰り返す」ということです。

繰り返すには「For～Next」というコードを使います。
このコードは、マクロを作るうえではとても重要なもので、
逆にこれだけ覚えていたら、簡易なマクロであればなんとなくの雰囲気だけで作れちゃったりします。

For start To end
     処理
Next

上記の通りstartからendまで、処理を繰り返します。
startの値は一度繰り返すごとに1ずつ増えていき、startの値は処理内で使用することができます。

では、実際に作ってみたコードがこちらです。

Sub PrintFromTo()
　→　マクロ名（関数）
'
' PrintFromTo Macro
'
    Range("G2").Select　→　G2を選ぶ
    
    For i = Range("G5").Value To Range("H5").Value
　　→　iという変数（入れ物）に入れたG5の値からH5の値まで繰り返す
        ActiveCell.FormulaR1C1 = i　→　選んだG2へiの値を入れる
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
            IgnorePrintAreas:=False　→　印刷する
    Next　→　iの値を1プラスしてForに戻る

End Sub　→　マクロを終了する

これでコーディングは終了です。初めてでもなんとなく理解できたら幸いです。

できたらコードエディタを右上の×で閉じて、マクロを実行してみましょう。

想定通り、繰り返し印刷できていたら成功です！

（必要であれば）マクロ実行のためのボタン等を作成する

前項のとおりマクロができましたが、毎回マクロの画面を開いて実行と押すのも非効率なので、
必要であればボタン等装飾してみるのもおすすめです。

今回は、ボタンを押すと設定したマクロが実行できるようにしてみましょう。

まず、図形から丸みを帯びた四角のボタンを作成します。

次にボタンを右クリックし、「マクロの登録」を押すと、
以下のように登録画面が出てきますので、作成したマクロを選択しましょう。

これでマクロボタンの作成についても完了です。

どうでしょう、わりと簡単だったなと思っていただけると嬉しいです。
少し難しいと思っても数回やってみると、
「ふ～ん、こんな感じか」と慣れてくると思いますので、是非チャレンジしてみてくださいね！

以上です。
今回の記事が何かの参考になれば幸いです。ありがとうございました♪

投稿 【Excel VBA】初心者でも簡単にマクロを作る方法 は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

今回は、Excelにてワイルドカードと呼ばれるアスタリスク「*」・はてな(クエスチョン)「?」を検索する方法を紹介します。
合わせて「*」「?」が検索できない理由やワイルドカードについても説明していますので、そちらもご一緒にどうぞ♪

アスタリスク(*)・はてな(?)の検索方法

「*」「?」の前に「~」をつけると検索できるようになります。

「~*」

「~?」

「*」「?」が検索できない理由やワイルドカードについて

「*」「?」が検索できない理由

アスタリスク(*)・はてな(?)を普通に「*」「?」で検索すると、
検索対象の「*」「?」だけではなく全ての文字が検索されてしまいます。
例）Excelで「123」「あいう」「?123」のセルがそれぞれあったとき、
「?123」の「?」を検索しようとすると、
「123」も「あいう」も「?123」も検索される。

これは、「*」「?」がワイルドカードと呼ばれる特殊文字のため、
検索する際は単純に「*」「?」として認識されていないからです。

ワイルドカードとは

ワイルドカードとは、一般的にトランプ等のカードゲームの「万能カード」を連想することが多いかと思いますが、
情報分野におけるワイルドカードについても似た意味で「万能」と言えます。

ワイルドカードは、検索する際にどのような文字や文字列にもマッチする特殊文字です。

「*」　…　0文字以上のどのような文字や文字列にもマッチ
「?」　…　1文字のどのような文字にもマッチ

例）「123456」「あういえお」というセルがあった場合、
　　以下のような検索キーを使うと、このようにマッチします。

投稿 【Excel】アスタリスク(*)・はてな(?)の検索方法【簡単】 は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

Excelで文字を上下反転（180度回転）させる方法を紹介します。
複数文字（文字列）も簡単に上下反転できますので、良かったらご参考にどうぞ♪

文字を上下反転（180度回転）させる方法

文字を入れた図形を180度回転させることで、上下反転を実現します。

１．文字を入れた図形を作成します。

２．クリックし、〇箇所を掴んでひっくり返します。

↓

以上です。簡単ですね♪

使用例：フロアマップ作成

前項の使用例になります。

概要：スーパーのフロアマップを作成し、出入口に貼る。
裏出入口からもお客様が出入りするため、裏出入口側にも上下反転して貼りたい。

１．表の出入口から見たフロアマップを作成する。
この際、各文字を図形にしておく。

２．画面右上の「検索と選択」から「条件を選択してジャンプを選択」
選択オプションが表示されるので、「オブジェクト」を選択すると、
図形全てが選択されるので、前項のとおり上下反転させる。

↓

↓

↓

↓

３．上下反転させたデータを、スクリーンショットしてペイントに貼り付け、
全て180度回転させて完成
（Excel上でコピーして、貼り付けた後、反転させると
文字が濃くなったりしてうまくいかない場合があるので注意です）

セルに文字が一文字だけの場合のみ使える方法

使用用途が限定的なのであまりおすすめしませんが、
図形を使わず上下反転させる方法も紹介します。

今回は例として、以下の「字」という文字を上下反転させます。

以下の異なる手法の「左へ90度回転」を組み合わせ、180度回転させます。
１．フォントの前に「@」をつける。（「左へ90度回転」され、縦書きになる）
２．方向ボタンをクリックし、「左へ90度回転」をクリック

このように一文字だけなら上手くいきます。

ただ、以下のように複数文字（文字列）の場合、
想定とは異なる結果（縦書き）となりますので、ご注意ください。

↓

今回の記事は以上です。

今回の作業ですが、
マクロの記録を使えば次回からボタンを押せば何度でも反転できるようにもなりますよ♪
興味のある方はこちらをご覧ください！

【Excel VBA】初心者でも簡単にマクロを作る方法

業務効率化したい方必見！OfficeのExcel VBAで"初心者でも簡単に"マクロを作成する方法を紹介しています。知識0でも理解できるようサンプルはもちろん画像たっぷりで説明していますので、是非見て試してみてください♪

nyanblog2222.com

2022.07.10

投稿 【Excel】文字を上下反転（180度回転）させる方法 は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

今回はつみたてNISAの資産運用シミュレーションをExcelVBAで作ってみました。
計算方法は金融庁のシミュレーションサイトと同様のものとなります。
よかったら前回の記事もどうぞ♪

【Excel】つみたてNISAシミュレーション（1）【計算方法】

金融庁が公開しているつみたてNISAの資産運用シミュレーションをExcelで作ってみようと思います。金融庁のサイトでは具体的な計算方法はありませんでしたが、試行錯誤しながら調べてみましたので気になる方はどうぞ♪1 つみたてNISAとは2 金融庁の資産運用シミュレーション3 計算方法4 グラフ5 まとめ……。

nyanblog2222.com

2020.07.16

マクロ（VBA）が難易度が高い！と思われる方は一度こちらも見てくださいね♪
練習になるかもしれません。

【Excel VBA】初心者でも簡単にマクロを作る方法

業務効率化したい方必見！OfficeのExcel VBAで"初心者でも簡単に"マクロを作成する方法を紹介しています。知識0でも理解できるようサンプルはもちろん画像たっぷりで説明していますので、是非見て試してみてください♪

nyanblog2222.com

2022.07.10

つみたてNISAシミュレーション作成手順

今回は、
１．EXCELシート作成
２．VBAコード記述
３．マクロ設定
の流れで紹介していきます。

１．EXCELシート作成

まず、入力フォームとして以下を作成します。

ボタンについては「開発」タブ→「挿入」→「ボタン」から作成できます。

２．VBAコード記述

まず、「開発」タブ→「Visual Basic」からVBA記述画面を開きます。

記述していくVBAコードについては以下です。
内容の説明については、コードのコメントを参照ください。

基本的に、前回紹介した計算方法のイメージ通り作成します。

１．計算①　配列に月々の複利計算結果を格納

２．計算②　①の配列から、月々の累計元本・積立額を算出。年毎に配列へ格納

３．出力用配列作成　②の配列を元に出力したい要素を計算し、配列へ格納

４．出力　出力用配列から、それぞれEXCELシートに出力していく
　（３までで出力用データの計算は全て行い、
　　後は４でほぼそのまま出力するだけのイメージ）

■TumitateNisaマクロ

Sub TumitateNisa()

    '積立年数から月数をセット
    Dim TOSHIKIKAN_NEN As Integer
    TOSHIKIKAN_NEN = Range("C2").Value2
    Dim TOSHIKIKAN_NEN_ARRAY As Integer
    TOSHIKIKAN_NEN_ARRAY = TOSHIKIKAN_NEN - 1
    Dim TOSHIKIKAN_TUKI As Integer
    TOSHIKIKAN_TUKI = TOSHIKIKAN_NEN * 12
    Dim TOSHIKIKAN_TUKI_ARRAY As Integer
    TOSHIKIKAN_TUKI_ARRAY = TOSHIKIKAN_TUKI - 1
    
    '月投資額をセット
    Dim TOSHIGAKU_TUKI As Long
    TOSHIGAKU_TUKI = Range("C3").Value2
    
    '利回り（年）から利回り（月）表面金利をセット
    Dim RIMAWAEI_TUKI As Double
    RIMAWAEI_TUKI = 1 + (Range("C4").Value2 / 12 / 100)
    
    '各配列用　年数が最大100年まで（12か月*100年）
    'コードがややこしくなるのと、
    'あまり増えても環境によってはEXCELがフリーズしたりするので
    '今回は動的配列にはしない
    Const MAXARRAY_1200 As Integer = 1200
    
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    '
    ' 計算①　配列に月々の複利計算結果を格納
    '
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    Dim TumitateArray(MAXARRAY_1200, MAXARRAY_1200) As Double
    For i = 0 To TOSHIKIKAN_TUKI_ARRAY
        
        Dim Tumitate_Tuki As Double
        Tumitate_Tuki = TOSHIGAKU_TUKI
        For j = 0 To TOSHIKIKAN_TUKI_ARRAY
        
            TumitateArray(i, j) = 0
            
            If j >= i Then
                TumitateArray(i, j) = Tumitate_Tuki
                
                Tumitate_Tuki = Tumitate_Tuki * RIMAWAEI_TUKI
            End If
    
        Next j
    
    Next i
    
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    '
    ' 計算②　①の配列から、月々の累計元本・積立額を算出。年毎に配列へ格納
    '
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    Dim YearSumArray(MAXARRAY_1200, 1) As Double
    Dim GanponSum As Double
    GanponSum = 0
    Dim YearNum As Integer
    YearNum = 0
    For j = 0 To TOSHIKIKAN_TUKI_ARRAY
        
        If j > 0 And j Mod 12 = 0 Then
            YearArrayNum = YearArrayNum + 1
        End If
        
        Dim TumitateSum As Double
        TumitateSum = 0
        For i = 0 To TOSHIKIKAN_TUKI_ARRAY
            TumitateSum = TumitateSum + TumitateArray(i, j)
        Next i
        
        '累計元本
        GanponSum = GanponSum + TOSHIGAKU_TUKI
        YearSumArray(YearArrayNum, 0) = GanponSum
        '累計積立額
        YearSumArray(YearArrayNum, 1) = TumitateSum
    
    Next j
    
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    '
    ' 出力用配列作成　②の配列を元に出力したい要素を計算し、配列へ格納
    '
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    Dim YearTumitateArray(MAXARRAY_1200, 3) As Double
    For i = 0 To TOSHIKIKAN_NEN_ARRAY
        '累計元本
        YearTumitateArray(i, 0) = YearSumArray(i, 0)
        '累計運用益
        YearTumitateArray(i, 1) = YearSumArray(i, 1) - YearSumArray(i, 0)
        '累計積立額
        YearTumitateArray(i, 2) = YearSumArray(i, 1)
        '累計節税額
        YearTumitateArray(i, 3) = YearTumitateArray(i, 1) * (20.315 / 100)
    
    Next i

    '''''''''''''''''''''''''''''''''''''''''''''''''''
    '
    ' 出力　出力用配列から、それぞれEXCELシートに出力していく
    '
    '''''''''''''''''''''''''''''''''''''''''''''''''''
    '前回のシュミレーション結果をクリアしておく
    Range("B7:F106").Clear
    
    '出力開始位置の一つ上にへカーソル移動
    Range("B6").Select

    'それぞれEXCELシートに出力
    For i = 0 To TOSHIKIKAN_NEN_ARRAY
        
        ActiveCell.Offset(1, 0).Activate
        '年
        ActiveCell.Value2 = i + 1
        '累計元本
        ActiveCell.Offset(0, 1).Value2 = Round(YearTumitateArray(i, 0))
        '累計運用益
        ActiveCell.Offset(0, 2).Value2 = Round(YearTumitateArray(i, 1))
        '累計積立額
        ActiveCell.Offset(0, 3).Value2 = Round(YearTumitateArray(i, 2))
        '累計節税額
        ActiveCell.Offset(0, 4).Value2 = Round(YearTumitateArray(i, 3))
        
    Next i
    
    '罫線を引く
    ActiveCell.CurrentRegion.Select
    Selection.Borders.LineStyle = xlContinuous
        
    '桁区切りする
    Selection.NumberFormatLocal = "#,###"
    
    '最終行の文字を赤色にする
    Selection.Rows(Selection.Rows.Count).EntireRow.Select
    Selection.Font.ColorIndex = 3
    
    'カーソルを年数に戻す
    Range("C2").Select

End Sub

３．マクロ設定

最後に作成したマクロをボタンに登録します。
「右クリック」→「マクロの登録」

マクロを選択して、完了です。

シミュレーション使用方法について

使用方法は簡単です。
「年数」「月投資額」「利回り（年）」を入力して、
「つみたてNISAシミュレーションを開始する」ボタンをクリックするだけ♪

試しに、金融庁のシミュレーションと比べてみましたが、
問題なく同じ結果となりました。
資産運用シミュレーション ： 金融庁

色々と分析してみた

せっかくなので、いくつかのパターンでシミュレーションしてみました♪

利回りが3%と5%どれくらい差が出る？（20年・月20,000円・利回り3%or利回り5%）

2%変わるだけで、運用益が倍変わることが分かります。

[3%の場合]

[5%の場合]

20年間最大額積み立てた場合、いくら貯まる？（20年・月33,333円・利回り5%）

つみたてNISAは年40万円・20年間つみたてが可能です。
そこで仮に平均利回りが5%だった場合、以下の結果となりました。

老後2000万円問題！月5000円積み立てると何年で2000万円貯まる？（60年・月5,000円・利回り5%）

月5,000円ですと、56年で達成可能なようです。
元本と運用益の差から、複利の凄さがよくわかりますね。

万が一、今後経済が不況に陥り、利回り-5%（赤字）だとどれだけ損する？（20年・月20,000円・利回り-5%）

前述の利回り5%と比べると、意外に損失が低いことが分かります。

[-5%の場合]

[5%の場合]

投稿 【Excel】つみたてNISAシミュレーション（2）【VBA】 は nyanblog ~にゃんぶろぐ~ に最初に表示されました。

金融庁が公開しているつみたてNISAの資産運用シミュレーションをExcelで作ってみようと思います。
金融庁のサイトでは具体的な計算方法はありませんでしたが、試行錯誤しながら調べてみましたので気になる方はどうぞ♪
資産運用シミュレーション ： 金融庁

※本記事は、金融庁のサイトでのシミュレーションをExcelを使って再現するという趣旨です。
　素人が試行錯誤で作成しているもののため、ご使用にあたってはあくまで自己責任でお願いします。

つみたてNISAとは

つみたてNISAとは年間40万円までを20年間運用でき、分配金と売却益が非課税となる制度です。
購入可能な商品は金融庁が認めた投資信託に限られており、低リスクで運用でき長期投資に向いています。

本来、20.315%も課税されるためとってもお得！

詳しくは金融庁のつみたてNISAの概要へ

金融庁の資産運用シミュレーション

まず、金融庁では以下が公開されています。

毎月の積立金額・想定利回り（年率）・積立期間を入力し、
「計算する」ボタンで最終積立金額を表示します。

また、グラフについても表示できます。

次項から、上記の計算方法やグラフの出力方法についてご紹介します。

計算方法

金融庁のページには以下のように書かれていますので、こちらを参考に計算します。
【本シミュレーションの前提条件】
※年一回の複利計算をしています。
※計算結果は小数点以下を四捨五入しています。

ただ、以下の点には気をつけてください。
・年一回の複利計算
　→想定利回り（年率）に基づき、月に一回の複利計算（表面金利）をする
・計算結果は小数点以下を四捨五入
　→計算結果以外は四捨五入しない。

上記を考慮した計算が以下になります。
（数式→数式の表示から簡単に計算式を出せますよ♪）

上記のように月投資額、利回り（年）を入力することで、1年間の積立資産や運用額が分かるようにしました。
※本記事は計算方法中心の内容のため、あえて期間を1年限定にしています。
　期間変動可能なシミュレーションは、次回の記事でVBAを使い作成します。

利回り（月）の表面金利は、年率／12となりますので、それを使用して毎月の積立額にかけていきます。また、月に一回の複利のため、前月の額に金利をかけます。
それらが期間分続き、合計したものが積立資産になります。

資産推移（計算結果）は、ホームタブ→数値→「,」をつけることで、表示上は小数点以下四捨五入となりますので、「ROUND関数」は使いませんでした。

期間1年　月投資額20000円　利回り（年）5%で計算

結果は以下になります。前述の金融庁のシミュレーション結果と同じ積立資産なので、計算方法は合ってそうですね♪

グラフ

次にグラフ作成です。

まず、グラフ出力用にデータを整形します。
グラフ作成後にグラフの機能でデータを整形してもいいので好みの問題ですが、整形したデータをそのまま出力した方が楽で正確です。
整形時は、金融庁のシミュレーションを見ると千円単位で四捨五入なので、合わせました。

前述のデータ（期間1年　月投資額20000円　利回り（年）5%で計算）を使用すると結果は以下になります。

このデータを使って、今回はグラフを作成します。
（１）グラフ用データにカーソルをあて、挿入タブ→縦棒→任意の形状を選択

（１）結果

（２）原本・運用益・積立資産の順番が想定と異なるため、データ選択→順番の入れ替え

（２）結果

（３）それぞれの値を表示する。データラベル→中央

（３）結果

（４）積立資産は運用益と原本の合計額のため、値だけ表示させる。
　　　右クリック→データラベルの書式設定→塗りつぶし→塗りつぶしなし

（４）結果

ここからは見栄えの問題なので、気にしないのであれば以下は不要です。
（５）右クリック→軸の書式設定→最小値と最大値の固定値を設定

（５）結果

（６）積立資産の値をグラフに近づけたいので、
　　　レイアウト→データラベル→内側軸寄り

（６）結果

（７）最後に単位をつける。
　　　レイアウト→テキストボックス→横書きテキストボックス→（「万円」）入力

以上で完成になります。
これでおおよそ金融庁のシミュレーションと同じようなものができました♪

以上、今回は金融庁のシミュレーションを計算し、グラフ化してみました。
計算方法については、
・想定利回り（年率）に基づき、月に一回の複利計算（表面金利）をする
が一番重要な点です。
次回は、実際の資産運用にも使えるようなつみたてNISAのシミュレーションをVBA使って紹介しますので、良かったらどうぞ♪

【Excel】つみたてNISAシミュレーション（2）【VBA】

今回はつみたてNISAの資産運用シミュレーションをExcelVBAで作ってみました。計算方法は金融庁のシミュレーションサイトと同様のものとなります。1 つみたてNISAシミュレーション作成手順2 シミュレーション使用方法について3 色々と分析してみた4 まとめ……

nyanblog2222.com

2020.07.20

投稿 【Excel】つみたてNISAシミュレーション（1）【計算方法】 は nyanblog ~にゃんぶろぐ~ に最初に表示されました。