• ベストアンサー

エクセルで「４」「９」抜けの連番を振りたい

エクセルで１から２０００までの連番を， 「４」と「９」を抜いて自動作成する方法はないでしょうか。 40番代，400番代なども，飛ばして作成したいのですが。 番号は，各セルに1個ずつ振ります。

質問者が選んだベストアンサー

  • ベストアンサー
  • maron--5
  • ベストアンサー率36% (321/877)
回答No.3

◆A1に「1」を入力して A2=--SUBSTITUTE(A1+IF(MOD(A1,1000)=888,112,IF(MOD(A1,100)=88,12,IF(MOD(A1,10)=8,2,1))),4,5) ★下にコピー

disk_m28
質問者

お礼

関数ではムリっぽい話があり，半ばあきらめていました。 自分以外の人も使用するリストに使う番号なので， この方法が最適です。 ありがとうございました。

その他の回答 (3)

回答No.4

> ４と９を抜いて自動作成する方法 > 40番代，400番代なども，飛ばして作成 とにかく４か９がつく数字を除くのでしたら、置換と並べ替えを組合わせたら いかがでしょうか。 1.A1:A2000に、オートフィルで連番を作成します。 2.置換処理を二度実行します。 　　1)検索する文字列：*4*　　置換後の文字列：（空白） 　　2)検索する文字列：*9*　　置換後の文字列：（空白） 3.Ａ列を昇順に並べ替えます。

disk_m28
質問者

お礼

いろいろな方法があるのですね。 検索・置換は，まったく考えていませんでした。 今回は，リストの構成上，この方法ではできなかったんですが， 「４」「９」抜けのリストは，今後も多く使用するので， 本当に助かります。 ありがとうございました。

  • dodemoii
  • ベストアンサー率59% (769/1282)
回答No.2

こんにちは 過去log http://questionbox.jp.msn.com/qa2173744.html? では。

disk_m28
質問者

お礼

結構探したんですが，このログは見つけられませんでした。 重複質問お恥ずかしい限りです。 ありがとうございました。

  • ASIMOV
  • ベストアンサー率41% (982/2351)
回答No.1

いろいろな方法が有ります（ＶＢＡとかも） 一例を．． 一旦、１－２０００まで連番を記入します（Ａ列１行からとします） Ｂ列1行に =ISERR(SEARCH(4,A1,1))+ISERR(SEARCH(9,A1,1)) と入れ、下にコピーします そうすると、４も９も無い行は"2"と表示され４か９が有る行は０か１になります オートフィルターを設定し、オプションで"2"以外とすると ４と９が含まれる行だけが抽出されます 行選択で、行削除とすれば完成です

disk_m28
質問者

お礼

Ｂ列を使って，オートフィルターを使う 言われると，わかるのですが，自分では気づきませんでした。 わかりやすい説明ありがとうございました。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • 見積書をエクセルで作成時に連番をふりたい。

    見積書をエクセルで作成しています、セルに見積書番号を付けたいのですが自動で連番を書き込む事はできますか？ 見積書のエクセルファイルを開いたときに番号が１つ増えて番号が記入されていく様にしたいと思っています。

  • エクセル2010で違うブック間で連番をふりたいです

    初めて質問します。 エクセル2010を使っていますが、一つのブックに見積書、注文書などをシートごとに 作成しそれを注文番号で、わかるようにしたいと思っています。 一個の注文が終わると、そのブックをコピーしてコピーしたブックをまた次の注文に 使いたいのですが注文番号を自動で連番をふる設定がどうしてもわかりません。 ※ブック1を開いたら注文書セルに0001　ブック1をコピーして開いたら注文書セルに 0002という感じです。 シート間ではなく、違うブックをコピーして使い開いたときに連番になる設定はできるのでしょうか？ VBAやマクロはまったくわかりません。 なにかいい方法があれば教えて下さい。

  • エクセル　シート追加時にセルに自動連番を入力。

    エクセルで顧客リストを作成しています。 シートを追加する方法でページを増やしていこうと考えて いるのですが、シートを追加すると会員No.と設けたセルに 自動で番号が連番で入力されるように設定したいです。 スタートの番号は00100から始めたいのですが。 宜しくお願い致します。

  • エクセル自動連番機能の解除方法

    エクセル自動連番機能の解除方法 エクセルで、セルを選択して下にドラッグしていくと自動で連番になりますが、任意の列だけは連番にならないようにする設定はありますか？

  • Ｅｘｃｅｌの連番をふりなおす

    Excelの表で、A列に連番をつけてあります。 行を挿入したり、削除したときに、連番がくずれないように 自動的にふりなおす方法があれば、教えていただけないでしょうか。 ヨロシクお願いします!!!

  • エクセル　VBA　飛ぶセルの自動連番のつけ方

    エクセル　VBA　で添付画像のように１枚に３０までの自動連番、 セルに1～150と入力すれば自動採番で５枚印刷できるような ＶＢＡをご教示下さい。 番号は001のような３ケタの場合でお願いします。

  • エクセルで複数ずつの連番を入力する方法

    こんにちは。 エクセル初心者です。 過去ログや他のサイトも調べたのですが、表現方法が悪いのかヒットしません。 今、エクセルに日本語を入力して表を作っています。 Ａ列に数字を入れて番号を振っているのですが、 表の性質上、1234・・・という連番ではなく、 111222333444・・・という同じ数字が3つずつ続く連番です。 それが800番まで続きます。 私が調べた限りではオートフィルや連続データではそういう番号の振り方はできないみたいで困っています。 今、50番台なのですが、手動で入れるのが苦痛になってきました。 初心者でも出来る方法で、これを自動的に大量入力する方法があれば、 ぜひ実行したいのです。どなたかご存知ではないでしょうか？ よろしくおねがいします。

  • 番号を飛び番号の連番で入力したい。

    番号を飛び番号の連番で入力したい。 excelで質問ですが、連続番号を入力する時、“１”と入力したら、そのセルをクリックしてカーソルを右下にもっていくと、黒十字に変わるのでそれをクリックしたままドラッグすると連番が入力されると思います。では、10番飛びに番号を振るにはどうしたらいいでしょうか？ たとえば、”１０００１”と入力し、その次のセルは“１００１０”となり、そのまま１０番飛びれ連番に表示させたいのです。入力数が多く、一つ一つ番号を入力するのは、とても出来ません。どなたかよろしくお願いいたします。

  • エクセルの連番設定について

    エクセルの連番設定について教えて下さい。 A列に文字を入力する際に管理番号として連番を振りたいのですが、 例えばA1に "1○○○○”と入力→リターン→次のセルに２がふられて、なおかつ文字も書き込める事って出来るのでしょうか？ よろしくです。

  • EXCELで条件付きの連番を振る方法

    EXCEL初心者です。 見積書の管理をEXCELで作成しています。 見積書番号は日付＋日付ごとの連番で管理しています。 例　2007年9月11日の1件目の見積書 　　→2007091101号 　　2007年9月11日の2件目の見積書 　　→2007091102号 　　2007年9月12日の1件目の見積書 　　→2007091201号 日付をいれると自動的に見積書番号を計算して別セルに表示するようにしたいのですが、方法がわかりません。 どなたかご教授ください。 お願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する