4,9を使わない連番作成｜ツイッター出題回答

公開日：2022-06-17　最終更新日：2022-06-22

4,9を使わない連番作成

ツイッターで出題した問題です。

日本では、部屋番号等の番号を振る時に4,9を使わない連番にする事が多々あります。
この4,9を使わない連番をシートで作成するツイッター出題です。

出題ツイート

「エクセル頭の体操」暇人専用
よくある問題ですが、
4,9を使わない連番作成
A1に1をいれてA2以降に、
2,3,5,6,7,8,10,11…38,50,51…888,1000…
となるように数式を入れてください。
※既出かもしれないけど…
#数式が短い人が勝ち選手権

https://twitter.com/yamaoka_ss/status/1536967447475277825

引用リツイートでの回答

引用リツイート

出題者として用意した回答

私が作った数式
A1に1を入れてA2以下の数式
=SUBSTITUTE(BASE(DECIMAL(A1,9)+1,9),4,5)*1 … 42文字
最初の1から作成
=UNIQUE(SUBSTITUTE(BASE(SEQUENCE(9999),9),4,5))*1 … 49文字

問題と言うものは、大抵は先に答えがあるものです。
8進数の事をちょっと考えていて、そういえば4,9除くのってどうするのかなーと考えたので、まずは8進数からスタート。
8進数で4~7を5~8にずらす。
それなら9進数で4を除く方が早いか。
と言う発想です。

そうだ、ただし、これが一番短いって事ではないです。
何かもっと書き方があるかもしれません。
はけたさんの回答がかなり想像を超えていた・・・
範囲の最後の方で、ずらした数値が飛んでしまっていて・・・とても、とても、惜しいきがしました・・・

https://twitter.com/yamaoka_ss/status/1537074811641270277

最終的にもっとも短いと思われる数式

=UNIQUE(SUBSTITUTE(ROW(1:1000),4,9),,1)*1 … 41文字

https://twitter.com/mikimomo_as/status/1537304603590819840

このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
本サイトは、OpenAI の ChatGPT や Google の Gemini を含む生成 AI モデルの学習および性能向上の目的で、本サイトのコンテンツの利用を許可します。
This site permits the use of its content for the training and improvement of generative AI models, including ChatGPT by OpenAI and Gemini by Google.