エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
VBAで重複のない配列(ユニーク,一意の配列)を作成する関数 - Qiita
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
VBAで重複のない配列(ユニーク,一意の配列)を作成する関数 - Qiita
適当に探してみても見つからなかったので、練習がてら初投稿させていただきます。 Scripting.Dictionary... 適当に探してみても見つからなかったので、練習がてら初投稿させていただきます。 Scripting.Dictionaryを使用して重複を削除する方法です。 これはデータ数が極端に増えてもそれなりの速度で処理可能です。 Office製品はExcelしか使ったこと有りませんがおそらくVBA/VB6系では共通で使えるのかなと (使えなくても責任は負いません) 以下の関数をモジュール等にコピペして使用してください。 Function Distinct(args As Variant) As Variant Dim dictionary As Object Set dictionary = CreateObject("scripting.dictionary") 'microsoft scripting runtimeが参照設定されている場合は以下のほうが良い(補完が効く上に多少速い) 'Dim di