• ベストアンサー

エクセルセル内を読み取り連番を振りたいです。

エクセルセル内を読み取り連番を振りたいです。日付、データ、連番用の3つのカラムがあります。 データにAという文字が含まれる場合は連番用のセルに0001から始まる連番を自動出力させたいと思います。Aが入っていないセルは出力は不要なので飛ばします。 データは続けてうちますが、月が変わったときには0001に戻したいのですが、よろしくお願い致します。

  • verify
  • お礼率44% (384/858)

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

  • ベストアンサー
  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.2

こんにちは! >データは続けてうちますが、月が変わったときには0001に戻したいのですが というコトですので、一例です。 ↓の画像でC2セル(セルの表示形式はユーザー定義から 0000 としておきます)に =IF(COUNTIF(B2,"*A*"),SUMPRODUCT((MONTH(A$2:A2)=MONTH(A2))*(ISNUMBER(FIND("A",B$2:B2)))),"") という数式を入れふぃりハンドルでずぃ~~~!っと下へコピー! これで画像のような感じになります。m(_ _)m

verify
質問者

お礼

すっごいです。ありがとうございます。

その他の回答 (1)

  • mshr1962
  • ベストアンサー率39% (7418/18948)
回答No.1

例に挙げられた表がA1:C4の範囲として C2=IF(COUNTIF(A2,"*A*"),TEXT(COUNTIF($A$2:$A2,"*A*"),"0000"),"") として下方にコピーしてください。

verify
質問者

お礼

ありがとうございます。助かりました。

関連するQ&A

  • Excel2007での自動連番の振り方

    Excel初心者です。 自動連番の振り方を教えて下さい。 宜しくお願いします! A列に連番 B列に文章 を入力したいのですが A1のセルが「1」として B1のセルに文字を入力したときに A2のセルに自動的に「2」と表示される B2のセルに文字を入力したときに A3のセルに自動的に「3」と表示される ↓ 以下、同じ方式で自動的に連番が振られていく・・・ この方法をご存じの方がいらっしゃいましたら、 ご回答宜しくお願いいたします。

  • エクセルでセルに少し複雑な連番をつけたいのですが、

    エクセルの自動連番が知りたいのですが、調べても自分のやりたいのが載ってないのですが、例えばセルA1に、080118-01と入力します。次にA2に入力するときには、080118というのは日付を表していますので、エクセルを開いた時点で、080119(本日の日付)が出て-01は02に次には03にしたいのですが、 関数か何かで方法があれば教えて下さい。よろしくお願い致します。

  • ACCESSの自動連番について

    ACCESS2000を使っています。 自動連番を通常すると1・2・3・・・と自動で連番を作成してくれますが、それを日付+連番というものに出来ますでしょうか? 例)1210001   1210002   |   1210100 日付は月と日にちで、連番は3桁です。 数字の連番の方は、日付が変わるとまた1に戻るようにしたいです。 何か良い方法があったら教えてください。

  • ACCESSで日付ごとに自動連番(日付+連番)する方法

    ACCESSで日付ごとに自動連番(日付+連番)する方法 ACCESSとvba、共に初心者です。 ACCESS2003を使用しています。日付ごとに自動連番する方法が知りたくいろいろ調べていたところ過去ログ(http://okwave.jp/qa/q726921.html)のベストアンサーさんの回答にたどりつきました。 とりあえず勉強と思い紹介されている通りにテーブル作成からフォームのレコード移動時へのコード貼り付けまで一通り行ってみましたが、自動連番とならず同じ番号のままとなってしまいます。(日付はパソコンの日付更新時にちゃんと反映されています。) 自動連番されないのは何が原因なのでしょうか。どなたかご教授の程よろしくお願いします。 例)DATEが5月5日の場合のIDへの記載値  0505001  0505001←ここが001のまま0505002にしたい。  0506001←日付が変われば0506(5月6日)に変わる。 以上、よろしくお願いいたします。

  • エクセルセル内の文字列を数字にするには?

    エクセルセル内の文字列を数字に変換する方法はありますか?できれば複数のセルを一括で変換したいです。 回答宜しくお願いします。

  • エクセルで連番をマクロで

    こんにちは いつもお世話になっています。 Windows7、エクセル2010で教えてください。  B3から仮にB100まで文字列があるとします、空白セルはありません。 この状態でA3からA100まで1から始まる連番をマクロで実行したいのです。 実際はB列のデータの最終行は不定です。つまり、B列にデータがなくなるまで(空白セルになるまで)A列に連番をつけたいのです。現在はA3,A4に1,2と入力し、オートフィルで該当セルを選択し「予測」で連番をつけています。 マクロ記録ではB列にデータがなくなる判断ができなくて作れません。 この作業が頻繁にあるものですからマクロができれば助かります。 よろしくお願いいたします。

  • エクセルセルの表示設定について:セルに「1-1」としたいので入力すると

    エクセルセルの表示設定について:セルに「1-1」としたいので入力すると自動的に「1月1日」に変換されます。セルの表示設定で表示形式が関連するのではといろいろ触っているのですが知識不足で解決しません。セルに「1-1」と入力した時、或る時は「1月1日」に又或る時は「1-1」になるようにするにはどのような設定方法が適当かお教えをお願いします。

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

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

  • excelの関数かマクロで連番、日付を付けたい

    こんばんわ、EXCELマクロ入門者です。 excelの関数かマクロ、VBAで日付や、連番を付けたいです。 できれば関数でできたらなぁと思います。マクロ、VBAはほとんど初めてです。 (1)まず、B2に商品名を入れます。 (2)すると、A2に連番、C2に今日の日付(システム日付)、 D2に商品名と今日の日付、商品ごとの連番が自動的に振っていく感じにしたいです。毎日たくさん入力するらしいのでマクロとかVBAとか関数で作ってくれと頼まれました。 A列は例えばA3に=if(B3="","",A2+1)を入れて何とかできたのですが、 C列の日付(today関数やnow関数ではファイルを開き直すと日付が変わってしまう)とD列の商品名-日付-商品ごとの連番で特に困っています。 イメージとしては下のような感じです。   A   B    C     D 1 連番 商品名 日付    商品名-日付-商品ごとの連番 2 1   ○○○ 2007/8/10  ○○○-2007/8/10-1 3 2   ××× 2007/8/12  ×××-2007/8/12-1 4 3   △△△ 2007/8/13  △△△-2007/8/13-1 5 4   ○○○ 2007/8/15  ○○○-2007/8/15-2 6 5   ○○○ 2007/8/16  ○○○-2007/8/16-3 どなたか、ご教授ください。 どうぞ、宜しくお願い致します。

  • Accessにてテーブル追加時の連番

    Accessにて、個人ごとの販売管理をするようなメイン/サブフォーム形式のフォームを作成しました。 テーブルA(メインフォーム用テーブル) ●個人CD ●氏名 ●住所  ・  ・ テーブルB(サブフォーム用テーブル) ●連番(個人CDごとに取得するよう設定) ●日付 ●個人CD ●商品CD ●個数  ・  ・ フォームにて入力する場合、連番は自動で取得するようなVBAを書いています。 追加クエリA ●日付 ●個人CD  ・  ・ ※1回の追加では、ひとつの個人CDに対して、1件分のデータ。 追加クエリAにより、テーブルBにまとめてデータを追加したい場合、 連番をどのようにして取得してよいか分かりません。 連番は、個人CDごとに振るようにしたいのですが、どのようにしたらよいでしょうか? よろしくお願いいたします。

専門家に質問してみよう