<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<oembed>
  <author_name>Infoment</author_name>
  <author_url>https://blog.hatena.ne.jp/Infoment/</author_url>
  <blog_title>Infomentのブログ ～Excel VBA奮闘記～</blog_title>
  <blog_url>https://infoment.hatenablog.com/</blog_url>
  <categories>
    <anon>Excel</anon>
    <anon>VBA</anon>
    <anon>試してみた</anon>
  </categories>
  <description>前回は、VBA100本ノックで「シートの並び替え」に挑戦した。 infoment.hatenablog.com 今回は、問題を解きながら思いついたことを一つ。 バブルソートやクイックソートがある中で、こんな並べ替えを思いついた。 並べ替えたい 配列Ａ内の要素のうち、最大値iMaxを求めておく。 配列Ａと同じサイズの、配列Ｂを準備する。 配列Ａ内の要素を先頭から確認し、同配列内の最小値と等しいとき配列Ｂに順次移植する。 移植した値は、再び最小値として検知されぬよう、配列Ａ内でiMax+1に置き換えておく。 再び配列Ａの先頭から、同じ処理を繰り返す。 これにより最終的に、以下の結果が得られる。 配…</description>
  <height>190</height>
  <html>&lt;iframe src=&quot;https://hatenablog-parts.com/embed?url=https%3A%2F%2Finfoment.hatenablog.com%2Fentry%2F2022%2F01%2F26%2F232245&quot; title=&quot;名前の分からないソート - Infomentのブログ ～Excel VBA奮闘記～&quot; class=&quot;embed-card embed-blogcard&quot; scrolling=&quot;no&quot; frameborder=&quot;0&quot; style=&quot;display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;&quot;&gt;&lt;/iframe&gt;</html>
  <image_url>https://cdn-ak.f.st-hatena.com/images/fotolife/I/Infoment/20220126/20220126230421.png</image_url>
  <provider_name>Hatena Blog</provider_name>
  <provider_url>https://hatena.blog</provider_url>
  <published>2022-01-26 23:22:45</published>
  <title>名前の分からないソート</title>
  <type>rich</type>
  <url>https://infoment.hatenablog.com/entry/2022/01/26/232245</url>
  <version>1.0</version>
  <width>100%</width>
</oembed>
