エクセルでオートフィルターで抽出した文字列に連番

このQ&Aのポイント
  • エクセルでオートフィルターで抽出した文字列に連番をつけたい方法を教えてください。
  • 通常、エクセルで連番をふる方法として、セルの右下を下方にのばすかダブルクリックする方法がありますが、フィルターで抽出した文字列に連番を付ける方法はありません。
  • 特定の文字列に連番を付ける場合は、検索・置換ではなく、マクロを使ったVBAプログラムを作成する必要があります。
回答を見る
  • ベストアンサー

エクセルでオートフィルターで抽出した文字列に連番

エクセルで、オートフィルターで抽出した文字列に連番をつけたく思っております。 通常、 apple1 apple2 apple3 ・ ・ と連番をふりたいときには、apple1とapple2を入力し、その2つのセルを選択状態にして、 セルの右下を下方にのばすかダブルクリックして連番を作成しています。 今回は apple pine apple apple apple green apple ・ ・ と言った具合に、既に入力された行が5000ほどあります。 このうち、「apple」だけが入力されたセルを「apple1」「apple2」・・・というように 変更したいと考えています。つまり、こんな感じが求める最終型です。 apple1 pine apple apple2 apple3 green apple ・ ・ 検索・置換だと、「pine apple」のappleや、「green apple」のappleも置き換わってしまうので、使えません。 フィルターでappleのみの行を表示させ、一番上に書いた時のようにapple1、apple2をて入力して セルの右下を引っ張ると、フィルターで見えなくなっているセルまでapple1、apple2、apple3と 連番になってしまいます。 なんとか、フィルターで抽出した「apple」だけのセルに対して連番を付加できないでしょうか?

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

  • ベストアンサー
  • dogs_cats
  • ベストアンサー率38% (278/717)
回答No.1

オートフィルはセルが連続している事が条件だと思います。 オートフィルターはセルは不連続になるので、連番を安易につける事は無理だと思います。 数式で先に連番をつけてオートフィルではいけないのですか? 同じシートでも、別シートでも可能ですが、添付画像はA列にデータ、B列に連番を数式で作成します。 B2式 =IF(A2=$A$2,A2&COUNTIF(A$2:A2,$A$2),A2) 下方へオートフィル B列選択コピー、A列選択、形式を選択して貼付けでテキスト選択、OKでA列に連番を含むデータが貼付けられます。B列デリート その後オートフィルで希望のデータになると思います。

takurotaku
質問者

お礼

dogs_catsさん、 丁寧に教えていただき、ありがとうございました。 A列の元データの横にB列を挿入し、 お教えいただいた通りのセル内の記述を使ってappleに連番をふることができました。 そこからA列へのコピーアンドペーストが上手く行かなかったため、 逆にB1のセルに「=A1」と記入しコピー、 その後、B列の空白セルをジャンプを使って選択、選択した空白セルにペースト、で、 のぞんだ通りの文字列を得ることができました。 繰り返しになりますが、丁寧にお教えいただきましたおかげで、 求める作業を終えることができました。本当にありがとうございました。

関連するQ&A

  • 《エクセル2000》オートフィルタで寄せたものに連番を振りたいのですが

    オートフィルタの条件で抽出したデータのみ連番を振りたいのですが、上から1、2、3と入力し後はオートフィルで入力しようとしても全部1になってしまい、うまくいきません。 どうすればいいのでしょう?

  • Excelでフィルタをかけた状態でオートフィルタで連番を振りたい

    Excelでオートフィルタを設定し、抽出したデータがあります。(ですので表示範囲があります)その抽出したデータのある列に連番を振りたいのですが、非表示ににゅうりょくされてしまうためうまくできません。 またオートフィルタで抽出した範囲の可視セルをコピーすることはできても、再度貼り付けることもうまくできません。 何か方法はないでしょうか。

  • オートフィルタ抽出データに連番をつけるマクロ

    オートフィルタで抽出したデータに連番をふりたいと思っています。このサイトで調べた結果、オートフィルタをかけてのオートフィルでの連番入力はできないと知りました。 現在しようとしているのは   A  B  C 1 クラス NO 氏名   2 1    ○△ 3 2    □× 4 1    ★♪ というデータがあり、項目にオートフィルタをかけている状態です。クラスを抽出した場合にそのクラスでの通し番号(連番)を付けたいのです。SUBTOTAL関数だと、連番が表示されるのはオートフィルタで抽出している間だけです。SUBTOTALでつけられた連番を、オートフィルタを解除しても残しておくにはどうしたらよいでしょうか。やはりコピー&ペーストしかないのでしょうか?似たような質問が多々ありますが、コピー&ペースト以外の方法をご存知の方、どうか教えて下さい。

  • エクセルのオートフィルターの使い方

    エクセル2010で1000行程度の表からオートフィルターで必要な情報を抽出しているのですが、該当する条件を▼セルで探すのも面倒なので、所定のセルに条件を入力したらオートフィルターで抽出できる方法があれば教えてください。

  • オートフィルタで抽出した行にだけ連番を振りたい

    500件程度の製品データに対して、製品1、製品2、製品3でフィルタ抽出後、製品1に該当する行にだけ、1~連番を振りたいのですが・・・普通に連番コピーしますと、隠れている製品2・3のセルを含めた状態で、連番が振られてしまいます。 これを回避する操作法はないのでしょうか? 例えば、ツールメニューや書式設定メニューから、「可視セルにのみ連番コピーする」などと、指定しておく事は出来ないのでしょうか?

  • エクセルで空白セルを抽出して連番

    データが約1,000件あって、その中のある列の一部のセルに飛び飛びに空白セルが200件ほどあります。 これを抽出して、001などのように3桁の連番をふりたいと思います。 オートフィルターを使ってセル毎に入力しましたがらちがあきません。 まとめてできる方法がないでしょうか。

  • EXCEL オートフィルタ 連番について

    以下のような4セットごとの連番を追加したいのですが、 通常の状態ですとセルを数値型にすればオートフィルで問題ないのですが、オートフィルタを使用しているとうまくいきません。 SUBTOTAL関数で可能でしょうか? 良い方法があるようでしたらお願いします。 1 1 1 1 2 2 2 2

  • オートフィルタの抽出速度を上げるには?

    エクセルで、データを抽出する際よく「データ」→オートフィルタ」を使うのですが、データ量が増えるにつれデータ抽出するのに5秒ぐらいかかるときがあります。 それが、別のエクセルファイルで、私がよく使うファイルよりもはるかに重いものがあるのですが、そのファイルで「オートフィルタ」を使ってもデータ抽出するのに5秒もかかりません。 もしかして、セル入力に「リスト」を使うのと「直接入力」とでオートフィルタの抽出速度の差が出てるのかなと思ったりもしたのですが、どうなんでしょうか? いろいろ調べたのですが、わからないので、アドバイスを下さい。

  • excel 2003 オートフィルタ!

    excel 2003で、オートフィルタがうまくいきません。 A列の2行目から、1~5までの数字がランダムに並んでいるとします。 A1セルをオートフィルタし、 条件を、オプション>3を含む で指定すると、3がフィルタされてほしいのですが 1つも抽出されません。 3で始まるもだめでした・・ フィルタで抽出するマクロをくんでいて 列は、20列以上あり、 列によって、文字や数値があります。 フォームで列を選び、検索文字を入力して Criteria1:="=*" & 検索文字 & "*", Operator:=xlAnd と言う感じでフィルタしています。 文字はできますが、数値ができないのは、なぜでしょうか・・・

  • エクセル オートフィル抽出行に連番

    オートフィル抽出行に連番をつけたいのですが、 何か良い方法があれば教えて下さい。

専門家に質問してみよう