• ベストアンサー

excelでのフィルタ

SevenStar777の回答

回答No.1

自動化で別シートへの抽出となるとマクロしか思いつかないんですが、 成績表の書式を以下のものと仮定して、 データが入力されてるシート名を"Sheet1"、 抽出先のシート名を"Sheet2"とします。     A     B    C 1 ノート提出 学籍番号 氏 名 2   未     0001  Aさん 3   済     0002  Bさん Sub Macro1() Dim i as Integer Dim RowNo1, RowNo2 as Integer RowNo1 = 2: RowNo2 = 2 Do Until Sheets("Sheet1").Cells(RowNo1, 1).Value = "" If Sheets("Sheet1").Cells(RowNo1, 1).Value = "未" Then For i = 1 to 3 Sheets("Sheet2").Cells(RowNo, i).Value = Sheets("Sheet1").Cells(RowNo, i).Value Next i RowNo2 = RowNo2 + 1 End If RowNo = RowNo + 1 Loop End Sub ご希望の回答になってますでしょうか?

関連するQ&A

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

    エクセルで住所録を作り、そのうちの東京都のデータだけオートフィルタで抽出し、それを別のシートにコピーして表を作りたいのですが、抽出はできても表にすることができません。オートフィルタで抽出したデータだけを一覧表にすることはできないのでしょうか?

  • エクセル2000のオートフィルター

    エクセル2000のオートフィルターについてです。 そんなに詳しくないですが。。。 表を作成して、顧客リストをつくりました。 シート1には全リストを打ち込んでいます。 オートフィルターと言う機能を知って、担当者別にシートを分けたいのです。(シート2担当:山田)(シート3:鈴木) それで、CSVで保存したいのですが。。。 挑戦しても、CSVに保存した瞬間、担当者別にしていたのに、リストが全て表示されてしまいます。 不可能なんですか?

  • エクセルのオートフィルタを使って2つの違う表に使うことができますか?

    エクセルのオートフィルタを使って2つの違う表に使うことができますか? あるエクセルの表で同じシートに2つの違う表がありまして、その表にオートフィルタをかけなかけてはいけないんです。   1つ目が・・・       社会人 主婦 学生 その他 合計 1とてもよい 2よい 2つ目が・・・       20歳未満 30歳未満 40歳未満 40歳以上 1とてもよい 2よい こんな感じで上下に並んでいます。 この表に合計以外のところにエクセルのオートフィルタをかけるのですが。どうやってもどちらか1つしかかからないのです。 どうしたらいいですか?

  • エクセルでのフィルターについて

    エクセル2000を使っています。 フィルターをかけた結果データを自動的に別のシートに作成するようなことはできますか? たとえば、SHEET1に1から100までのデータがあるのですが、ある条件Aでフィルターをかけて抽出された30件のデータだけの別のSHEET2、また、条件Bで抽出された20件をまた別のSHEET3に自動的に作れたらというイメージです。 よろしくお願いします。

  • エクセル 別々のシートのオートフィルタ

    シート1とシート2に同じ形式の表があり、 シート1とシート2の中から同時にオートフィルタで検索をしたいのですが、 どうすればよいでしょうか? よろしくお願いいたします。

  • エクセル オートフィルターがかからないファイルって何か設定されてる?

    エクセルで 6項目くらい並んでる縦に長い なんでもない普通の表なのですが オートフィルターがかかりません。 他のシートのもやはりかかりません ファイルに何か設定されてるのでしょうか? オートフイルターが反転がかかっているのです 

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

    エクセルシートにデータが3000個近くあるんですけどオートフィルタで「すべて」を選んでもリストの中には3000個全部が表示されません。 どうしたらよいでしょうか? 番号    x 4562    1 25466   1 23694   1 21456   1 58498   1 4588     1 5787    1 8946    1 14586    1 85446    1  ・     ・  ・     ・ このように数値がバラバラに並んでいて見たい数値(例えば8946)がエクセルシートの表の中にはあるのにオートフィルタのリストをクリックして、見るとそこには8946がないんです。「すべて」を選んでるのにリストをクリックしてもないのはどうしてでしょうか?オプションの設定で範囲もきちんとしたんですが。数に制限でもあるんでしょうか?お願いします。

  • エクセルでのオートフィルタに関して(マクロ)

    1行目にタイトルがある表がありましてその表に オートフィルタを掛けて条件を複数指定して検索・・・ここまで手作業。 その後マクロでヒットした行をコピーして別のシートにコピーしたり、ということを行っています。 もともとの表のデータ数は日々増減していて ほしい行の行数も毎回変わってきます。 検索した行をコピーするために選択すると Rows("2809:2809").Select こんな具合に 行番号で指定されるのでデータ数が増減すると うまくいきません。 検索条件を指定して検索した行を うまくマクロで指定することは出来るのでしょうか? 良い方法がありましたら御教授願います。 もう一点ですが 自動記録でオートフィルタの画面を開いたままでは「記録終了」できないですよね? マクロでフィルタ画面を開いて 検索条件を指定するところから手作業でするのは可能でしょうか? あわせてよろしくお願いします。

  • Excelのオートフィルタで選択⇒別セルへ

    Excelのオートフィルタで選択⇒別セルへ 顧客名と担当者氏名が紐付いている表を作成しています。 一人の担当が複数の顧客を担当しているためオートフィルタを設定しており、 担当名を選ぶと該当の顧客が出てくる感じの表です。 その表の上部に、「○○様 以下顧客リストとなります。ご対応願います。」 のような感じで、オートフィルタで担当を選ぶと ○○の部分に同じ担当名が出てくるようにしたいのですが、 関数で行うことは可能でしょうか? また特に誰も抽出していないとき(すべて表示)は、 ○○には何も表示されないようにしたいです。 無知で申し訳ございませんが、詳しい方ご教授いただけますと幸いです。 宜しくお願い致します。

  • Excelのオートフィルタについて

    お世話になります。 Excelであるファイルだけオートフィルタが灰色表示になって選択できない状態となってしまいました。 最悪シートを別ファイルにコピーをすればオートフィルタが使えるのですが、原因がわからず困っています。 オートフィルタの有効・無効を設定する項目でもあって気づかないうちに無効にしてしまったのでしょうか。 もし解決法をご存知の方がいらっしゃいましたらご指導お願い致します。