Infoment https://blog.hatena.ne.jp/Infoment/ Infomentのブログ ～Excel VBA奮闘記～ https://infoment.hatenablog.com/ Excel VBA ユーザー定義関数 作ってみた 昨日は、テスト用の表を作成するために、「テキトー」（※「適当」ではない）な名前の社名を作って返す関数を作成してみた。 infoment.hatenablog.com今日はこれを元に、いよいよダミーテーブル作成に挑戦する。 兎に角「無作為感」を出したかったので、RandBetween関数を乱用してしまった。もっとスマートな方法もあるのだろうが、今回は手軽にこれで済ませた。 Sub CriateDammyTable(Optional record_number As Long = 10) ' 架空の会社名格納用配列。 Dim FictitiousCompanys() As String ' 会社名… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Finfoment.hatenablog.com%2Fentry%2F2020%2F01%2F07%2F232449" title="ダミーテーブル作成　① 前編 - Infomentのブログ ～Excel VBA奮闘記～" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/I/Infoment/20200107/20200107231836.png Hatena Blog https://hatena.blog 2020-01-07 23:24:49 rich https://infoment.hatenablog.com/entry/2020/01/07/232449 1.0 100%