ベストアンサー 【EXCEL】特定の範囲内の最大値が知りたいです。 2013/12/11 16:57 EXCEL2013を使用しています。 画像内の対象日ごとの開始時間の最小値、終了時刻の最大値を抽出したいのですが。 VBAを使って簡単にできないでしょうか。 今までは手作業で最大値最小値求めていました。 データの行が増えてきたため簡単にできたらなと思い投稿しました。 よろしくお願いします。 画像を拡大する みんなの回答 (1) 専門家の回答 質問者が選んだベストアンサー ベストアンサー aokii ベストアンサー率23% (5210/22062) 2013/12/11 17:00 回答No.1 挿入でピボットテーブルがお勧めです。対象日を行ラベル、Σ値を開始時間の最小値と終了時刻の最大値にすればいいはずです。 質問者 お礼 2013/12/11 19:25 素早い回答ありがとうございます。 うまくいきました。 通報する ありがとう 2 カテゴリ ビジネス・キャリア職種財務・会計・経理 関連するQ&A VBA Excel 特定の記号を含んだ行 Excel VBAにて、質問します。お手数ですが宜しくお願いします。 画像の様に、E列に特定の記号"●"や"▲"含んだ行以外、抽出し 印刷のシート名に貼り付けしたいと思います。 ですが、条件がありまして、その条件とは、InputBoxを使って 抽出したい日付を入力し、入力した日付、時刻までの記号"●"や"▲"以外 を抽出できる様にしたいです。 例えば実行時の日付が8/21日ならば InputBoxに、8/28 20:00と入力したら、入力した日付、時刻までの 記号"●"や"▲"以外を抽出となります。 画像の様に、1行目の見出し名も貼り付けできる様に、VBAを使って できませんでしょうか? ※ 画像ではSheet1のみ載せましたが、 Sheet2とSheet3とSheet4とSheet5とSheet6まで似た内容のデータがあるので シート名を指定して動作できると良いです。 Array("Sheet1","Sheet2","Sheet3","Sheet4","Sheet5","Sheet6")見たいな 感じでできますでしょうか? 御面倒お掛けしますが宜しくお願いします。 VBA Excel 特定の記号を含む行で Excel VBAにて、質問します。お手数ですが宜しくお願いします。 画像の様に、E列に特定の記号"●"や"▲"含んだ行以外、抽出し 印刷のシート名に貼り付けしたいと思います。 ですが、条件がありまして、その条件とは、InputBoxを使って 抽出したい日付を入力し、入力した日付、時刻までの記号"●"や"▲"以外 を抽出できる様にしたいです。 例えば実行時の日付が8/21日ならば InputBoxに、8/28 20:00と入力したら、入力した日付、時刻までの 記号"●"や"▲"以外を抽出となります。 画像の様に、1行目の見出し名も貼り付けできる様に、VBAを使って できませんでしょうか? ※ 画像ではSheet1のみ載せましたが、 Sheet2とSheet3とSheet4とSheet5とSheet6まで似た内容のデータがあるので シート名を指定して動作できると良いです。 Array("Sheet1","Sheet2","Sheet3","Sheet4","Sheet5","Sheet6")見たいな 感じでできますでしょうか? どの様なコードを書けば良いでしょうか? 御面倒お掛けしますが宜しくお願いします。 エクセルの任意範囲の最大値最小値の取得について エクセルデーター任意範囲の最大値と最小値の取得方法について教えて下さい。 例は以下の形式です。 //////////////////////////////////////////////////////////////// A B C D E G H I O 1 0.51 1.32 0.32 0.34 2 0.59 1.43 0.33 0.35 3 0.62 1.59 0.30 0.36 4 0.60 1.57 0.31 0.30 5 0.59 1.62 0.34 0.39 ←"+1" 6 0.68 1.64 0.34 0.34 7 0.68 1.60 0.33 0.33 8 0.59 1.58 0.31 0.30 9 0.49 1.40 0.33 0.29 10 0.38 1.20 0.29 0.29 . . . . . 11 -1.2 -2.3 -1.3 -1.4 . . . . . E列:昇順に1からの値 G列,H列,I列,O列:完全な規則性はない正負小数点の値。大きく見ると値は増加や減少ではあるが、1行ずつ見ると常に増加や減少とはなっていない。 最終行も未確定で、10回または、5回の同じ様なデーターの繰り返しで、繰り返し点(最大・最小)の値も決まっていない。 10回または、5回の各繰り返し点(最大・最小)を抽出し、以下の値を追記したい。 I列の最初の最大値の同じ行(B列)に"+1"、最小値の同じ行(B列)に "-1"を追記したい。同様に、"+1"~"+10","-1"~"-10"または、 "+1"~"+5","-1"~"-5"を追記したい。 I列が同じ場合、O列→H列→G列の順に最大値と最小値を判断する。 説明不足であるかもしれませんが、エクセル関数の組み合わせや、マクロ、VBAいかなる方法でもかまわないので、早急に処理できる良い方法はないでしょうか? よろしくお願いします。 Excel2003 VBA 最大値と最小値の求め方 自分でいろいろ調べてみたのですが、ちょっとわからなくて質問させて頂きます。 VBAのコードにMINとMAX関数を入れて日付の最大値と最小値を求めたいのですがうまくいきません。 処理の初めに、対象の列には書式をYYYY/MM/DDの書式にし、そのあと最大値と最小値を変数に入れて求めています。 値を入れる変数はデータ型にしています。 表には2008/3/12など表示されているのに、MAX,MINともに変数の値は0でした。 どうしてこうなるのか見当もつきません。 よろしければ、返答お願いします。 Excel2003に関しての質問です。 Excel2003に関しての質問です。 A列の各セルごとに数字や文字など、さまざまな文字列が存在したBookにて、 『数字が8個連なった行のみを抽出し、ほかの行は削除する』ことはできるでしょうか? たとえば添付のようなものです。 添付画像は2007ですが、会社のは2003なので… この場合は、2.3行目や5.6行目などを抽出し、ほかのデータは削除したいのです。 また、この抽出作業をマクロ記憶しておき、手間を省きたいと思っています。 面倒なのが、データの個数が日々増減しているので、 Aの○○行を毎回消せば大丈夫!というものでもないので、困っています。 どなたかご教示ください… 複数のExcelブックから特定シートのセル範囲抽出 同一フォルダ内にある複数のExcelブックから特定シートの特定セル範囲を抽出して一覧表にまとめるExcel マクロ(VBA)を教えてください。 このサイトで殆どよく似た回答を読んだのですがうまくいきません。VBA初心者です。 よろしくお願いします。 【前提】 ・実行する端末のOSはWindows 10 ExcelはOffice365 ProPlus ・対象フォルダはネットワーク接続フォルダ この中に、複数のExcelブック(xlsx、xlsm)があります。 ・抽出したい対象は、各ブック内の「台帳」シートの「A3:Cの最終行」で 複数のブックの中には「台帳」シートが含まれていないブックも混在しています。 【抽出一覧作成イメージ】 ・「集約.xlsm」ブックの「集計」シートの2行目から抽出した結果を一覧表示する。 ・「集約.xlsm」ブックにマクロは登録する ・表示はA列に抽出元ブック名(=ファイル名)、B列からD列に抽出元「A3:Cの最終行」セルの値。 ・「A3:Cの最終行」セルの値を「集約.xlsm」ブックの「集計」に貼り付ける際には「値で貼り付ける」が望ましい。 Excel2003で時間計算結果のコピー 時間表を作成し、開始時刻、終了時刻、作業時間、前作業終了時刻と今作業開始時刻との間隔を表示させてあります。(作業時間=終了時刻-開始時刻、間隔=今開始時刻-前終了時刻)この結果をコピーして数値として貼り付けたいのですが、通常の形式指定で値として貼り付けても出来ません。 又、終了時刻が24:00を超えると作業時間がエラーとなりますので、手で24:00を足して(01:00であれば25:00)ますが、これだと間隔時間がエラーとなる事があります。日付は現在入れてません。入れる事は可能ですが。 現状では、作業時間のトータル(Σ)をとっても結果が出ませんので、数値として貼り付け出来れば、計算が出来るのではと思い質問しました。 VBAのデータ抽出(間引き)について VBAのデータ抽出(間引き)について 当方VBA初心者なのですが、 VBA(EXCEL2007)を使用してグラフ作成をしようと思っています。 元データの書式は以下の通りでデータ行は30秒間隔で 一カ月分(8万行)あります。 2010/08/01 01:00:34 1112.83 2010/08/01 01:01:04 1110.43 2010/08/01 01:01:34 1111.87 2010/08/01 01:02:04 1112.23 2010/08/01 01:02:34 1112.43 2010/08/01 01:03:04 1112.03 2010/08/01 01:03:34 1110.83 2010/08/01 01:04:04 1112.43 2010/08/01 01:04:34 1110.63 ・・・ データ量が多すぎるので間引きしようと思っています。 間引き(抽出)条件は以下の様に考えています。 10行毎(5分毎)に値の最大値の行を抽出して別シートへコピー。 VBAマクロで処理するにはどの様な コードで実現可能でしょうか? 教えて頂きたく。よろしくお願いします。 Excel2002 データの抽出 Excel2002で塗りつぶしたデータの抽出をしたいのですがうまくいきません。やはり値でないと抽出できないのでしょうか? 一覧の表のデータの中でいくつかの行だけ塗りつぶしをしてあります。この塗りつぶしをした行だけ抽出したいのですが無理ですか? どなたかよろしくお願いします。 Excel:特定の条件でFLOOR関数を使うには? Excelを使って、勤務表を作成しています。 開始時刻、終了時刻を入力すると、 終了時刻ー開始時刻ー休憩時間という具合に当日の勤務時間を出力させるようにしています。 当日の勤務時間を出力するセルには以下の条件が必要です。 (1)開始、終了時刻が入力されていない時、0:00と表示する。 (2)開始時刻8:30(もしくはその時刻より前)、 終了時刻17:05と入力された時、7:50と表示する。 (3)(2)の条件以外は15分単位で勤務時間を表示する。 15分単位で丸めるということでFLOORを使うのですが、 そうすると(2)の条件がまったく無視されてしまい、うまくいきません。 FLOORを特定の条件の時のみ、適用する方法があれば教えて下さい。 よろしくお願いします。 使用ソフト:Excel2002 ------------------------------------------------- ちなみに以下のような計算式を当日勤務時間が出力されるセルに書いて試してみました。 =IF(D9="17:05","7:50",IF(COUNT(C9:D9)<2,"0:00",FLOOR(D9-P9-E9,"0 :15"))) 計算式の意味↓ 終了時刻に17:05と入力されたら、当日勤務時間のセルに7:50と表示。 開始、終了が入力されないと、0:00と表示。 そうでなければ、終了ー開始(8:30以前を8:30と考えるセル)ー休憩で計算し、15分単位で表示。 とこのように書いてみたものの…うまくいきませんでした。 EXCEL-複数列から特定内容の行のみ抽出 EXCEL2010です。 添付画像のように、「好物1~3」に入力されている内容で特定の文字(メロン)を含む行のみを抽出するにはどのようにしたらよいでしょうか。 【Excel VBA】指定した行の最大値を持つセル番地を取得したい 指定した範囲内で最大値及び最小値のセル番地を取得するには、 どうコーディングしたらよろしいでしょうか? 対象範囲 A1:Z2000の各行(行番は変数で処理) 例えば、 ---------------------------------------------------- For x = 1 To 2000 Range(A列のx行目:A列のx行目)の最大値 → B列 最小値 → Y列 Next x ---------------------------------------------------- このように、2000行分同じことを繰り返し、それぞれの行内での 最大値及び最小値を含むセルの列名を取得し、 B列のx行目を赤(最大値) Y列のx行目を青(最小値) に着色したいのです。 よろしくお願いします。 Excel2007でのフィルタ抽出がうまく行きません。 Excel2007でのフィルタ抽出がうまく行きません。 あきらかに存在する項目名が抽出対象項目の中になかったり、数値項目で抽出すると 10行あるのに5行しか抽出されない。などです。 類似のシートが10あり、平均5000行の表です。正しく抽出されるシートもあります。 どこがどう違っているのか特定不能です。 抽出対象から漏れる行があるということは、特定条件に合致した行の項目を加減乗除する 数式を入れてあるのですが、それも漏れている可能性アリでしょうか? だとすれば、電卓片手に全項目の検算?をみなさんやっているのでしょうか? Excel関数について,参照データの範囲が変わる時 Excelの関数について教えてください。 まずExcelで、”Sheet1とSheet2があり、Sheet2には、Sheet1のデータをもとに情報が入力されるように関数{IF(Sheet1!A1="","",Sheet1!A1)}を200行目まで入力されている”ものがあるとします。 それを使って以下のような作業を行います。 1. 職場のシステムからExcelデータを抽出する 2. 抽出したデータをエクセル(sheet1)に貼り付ける。 3. Sheet2にSheet1をもとにした計算結果が表示される 以上が現在、行っている作業です。 ただ問題があり、毎回、sheet1に貼り付けるデータの範囲(行数)が異なるため、sheet2のどこまでに数式を設定しておけばいいのかわかりません。今は適当に200行目まで数式を入力してあります。 『質問』Sheet1に貼り付けるデータの範囲(行数)と同じ範囲(行数)分だけ、Sheet2にも数式が表示されるようにしたい。(例)sheet1に2345行あるデータが貼り付けられた→それをもとに、Sheet2に関数を2345行目まで、自動で入力する。 大変お手数ですが、分かる方教えて頂けますか?よろしくお願いします。 オートフィルタで抽出したデータの行を削除(VBAで記述) Excel2000を利用しています。 VBAで、オートフィルタを利用した作業を記述したいと思っています。 データは一行目にタイトルが入っています。 オートフィルタで抽出したデータを その行まるまる削除したいと思っています。 その時、タイトル行(1行目)を除いて オートフィルタで抽出された行のみ選択して 削除する、という場合、どのように記述すればよいのでしょうか。 自分では全然分からないので 教えてください、よろしくお願い致します。 Excel:特定の時刻から15分単位で表示させるには? 勤務表を作成しています。 終了時刻ー開始時刻ー休憩時間という具合に当日の勤務時間を出力させるようにしています。 当日の勤務時間を出力するセルには以下のような条件で計算式を書いています。 <例> =IF(COUNT(C13:D13)<2,0,IF(AND(C13<="9:00"*1,D13>="17:40"*1,"18:1 4"*1>=D13),"7:40"*1,IF(AND(C13>="12:00"*1,"13:00"*1>=C13,D13>="1 7:40"*1),"4:40"*1,IF(AND(D13>="12:00"*1,"13:00"*1>=D13),"3:00"*1, FLOOR(D13-P13-E13,"0:15"))))) (1)開始、終了時刻が入力されていない時、0:00と表示。 (2)開始時刻9:00(もしくはその時刻より前)、 終了時刻17:40から18:14の間の時刻で入力された時、7:40と表示する。 (3)開始時刻12:00から13:00の間の時刻、 終了時刻17:40で入力された時、4:40と表示する。 (4)終了時刻12:00から13:00の間の時刻で入力された時、3:00と表示す る。 (5)(1)~(4)の条件以外は終了時刻ー開始時刻ー休憩時間という計算を 行い、15分単位で丸める。 (1)~(4)の条件は変更なしで、(5)の条件を変えます。 (5)終了時刻が18:15以降、当日勤務時間が7時間40分以上になる。 7時間40分から15分単位で丸める。 <例> 開始時刻9:00、終了時刻17:40の時、勤務時間7時間40分。(定時) 開始時刻9:00、終了時刻18:14の時、勤務時間7時間40分。 開始時刻9:00、終了時刻18:15の時、勤務時間7時間55分。 (一番上に書いたの計算式だと勤務時間が7時間45分になる) 開始時刻9:00、終了時刻18:16の時、勤務時間7時間55分。 ※P13は9:00以前の開始時間を9:00と考えさせる、 12-13時の時間を13時と考えさせる、 上記以外はそのまま表示させるという計算式を書いたセル。 (5)のような条件を加えた計算式が可能であれば教えて下さい。(アドバイス、ヒントでもかまいません。) よろしくお願いします。 使用ソフト:Excel2002 黒い文字のみの最大および最小値のカウントについて 何度も失礼します。 再びVBAについて、質問させていただきます。 エクセル2010を使用しています。 今回は黒文字のみ(文字色1)の数値で最大値と最小値の抽出を したのですが、どのようにしたらよいでしょうか? 複数のExcelブックから特定シートの特定セル抽出 同一フォルダ内にある複数のExcelブックから特定シートの特定セル値を抽出して一覧表にまとめるExcel マクロ(VBA)を教えてください。 よく似ている質問、回答を読んだのですが、私のレベルではとても応用できず質問させていただきます。 全く同じものがあれば、そのアドレスを回答いただくだけでも助かります。 【前提】 ・実行する端末のOSはWindows XP(SP3)、Excelは2003 ・対象フォルダはネットワーク接続フォルダ「\\share\target」 この中に、複数のExcelブックがあります。 ・抽出したい対象は、各ブック内の「概要」シートの「C3」セルで統一されています。 【抽出一覧作成イメージ】 ・「集約.xls」ブックの「Sheet1」の2行目から抽出した結果を一覧表示する。 ・表示はA列に抽出元ブック名(=ファイル名)、B列に抽出元C3セルの値。 ・C3セル値を「集約.xls」ブックの「Sheet1」に貼り付ける際には「値で貼り付ける」が望ましい。 というようなイメージです。 とても勝手なお願いではありますが、宜しくお願いいたします。 条件に合う最大・最小 エクセル 条件に合う最大 最小 について このような感じです。 1___A_____G_______H_____I_____O____ 2_________4_______3____3.1____1____ 3_________4_______3____3.1____2____←最大値 4_________3.1_____3____3.1____2__ 5________-2.1____-2_____1____-1__ 6________-2.5____-2_____1____-2____←最小値 7________-2.2____-2_____1____-2___ 以下値があります。 I列の最大値又は、最小値で複数最大(最小)がある場合には、 その最大(最小)の同じ行のO列の大きい(小さい)方で、 最大値(最小値)を判断する。 同様にO列も同じならH列の大きい(小さい)方で、 また、H列も同じなならG列の大きい(小さい)方で、 最大値(最小値)を求める。 優先順位は、I列→O列→H列→G列の順 *最小値の場合には、全て小さい値を対象。 上記例示の場合には、 最大値は3行目 最小値は6行目 値を重み付け(I列を1000倍等)してから合計して、最大・最小を求める方法以外での質問です。例示では、簡単に示していましたが、それぞれ値の桁数が異なる場合には、重み付けの係数をその都度してしなければならなくなりますので。 また、最大値・最小値に値する行(A列)に最大・最小等を追記したい。 行で単純に順次値を比較する方法はないのでしょうか? 解決法を教えて頂きたいのですが、宜しくお願いします。 エクセルVBAで作業進捗表を作成したいと考えてます。 エクセルVBAで作業進捗表を作成したいと考えてます。 C3の作業NO欄に任意の作業NO(桁数指定無)を入力するとA3にその時刻(開始時間)が自動入力されD3の状態欄に状態(プルダウンで終了が選択できる)を入力するとB3にその時刻(終了時間)が自動入力される。 この作業開始時間と終了時間の自動入力を3行目から100行目までを対象とするプログラムをりたいのですが、分かりません。 参考までに時間の表示形式は"h:mm"です。 またPCの使用環境はOSはXPでエクセル2003使用です。 ご存知の方がいましたらよろしくお願いします。 注目のQ&A 「前置詞」が入った曲といえば? 緊急性のない救急車の利用は罪になるの? 助手席で寝ると怒る運転手 世界がEV車に全部切り替えてしまうなら ハズキルーペのCMって…。 全て黒の5色ペンが、欲しいです 長距離だったりしても 老人ホームが自分の住所になるのか? 彼氏と付き合って2日目で別れを告げられショックです 店長のチクチク言葉の対処法 カテゴリ ビジネス・キャリア 職種 経営・管理職財務・会計・経理人事・総務営業事務・一般職デザイナー・クリエイティブ職マーケティング・企画コンサルティングSE・インフラ・Webエンジニア研究・開発・技術職法務・知的財産・特許その他(職種) カテゴリ一覧を見る あなたにピッタリな商品が見つかる! OKWAVE セレクト コスメ化粧品 化粧水・クレンジングなど 健康食品・サプリ コンブチャなど バス用品 入浴剤・アミノ酸シャンプーなど スマホアプリ マッチングアプリなど ヘアケア 白髪染めヘアカラーなど
お礼
素早い回答ありがとうございます。 うまくいきました。