- 締切済み
オートフィルタのようなマクロ
fumufumu_2006の回答
- fumufumu_2006
- ベストアンサー率66% (163/245)
とりあえず、Excelの色々な機能を使うと気づくのですが、１行目はデータではなく見出しにした方が良いかともいます。 A1=名前、B1-S1ホール番号 A2=参加者名１ A3=参加者名２ A4=参加者名３ 上記の中で、１回でもホールインワンを出した人を探し出すと言う事なら、下記のようではどうでしょうか？ 違ったら読み飛ばしてください。 T2=MIN(B2:S2) にして、人数分下へコピーする。 T列はその人の最短ストロークになるので、後はオートフィルタで１を表示させる。 その他にExcel使ってスコア管理すれば、ぺリアの計算やオリジナルハンデの計算を前もって設定すれば、順位の計算が瞬時にできます。 打ち上げの時点で隠しホールを１つづつ決める度に、その時点での順位を見ることとかもできます。 また「あのホールが隠しホールなら何位だったのに」という、ちょっとむなしいシミュレーションもできます。
関連するQ&A
- ４つの並べ替えをする方法を教えてください
EXCELLで、グランドゴルフの順位を素早く決めるための並べ替えをしたのですが、３項目までしか出来ません。４項目目を追加するにはどうしたらよいのでしょうか。 (1)スコア(2)ホールインワン数(3)２打数(4)年齢 の順です。
- ベストアンサー
- その他MS Office製品
- マクロ オートフィルタで困っています。
マクロ オートフィルタで困っています。 1列目と2列目からそれぞれ条件をフィルタで抽出し、抽出された行を削除するマクロを組んだのですが（下記）、Bの条件が表にない場合に2行目から下が全て削除されてしまいます。 元の表は毎週変わるため、抽出する条件があるかないかはその時次第です。 オートフィルタにこだわってはいませんが、その他の抽出方法もいまいち分からず……。 どのようにすればよいのか、教えていただけますでしょうか。 宜しくお願い致します。 <マクロ> Sub Macro() Selection.AutoFilter Field:=1, Criteria1:="A" Selection.AutoFilter Field:=2, Criteria1:="B", Operator:=xlAnd Dim gyou(1) As Long gyou(0) = 2 gyou(1) = Range("A1").CurrentRegion.Rows.Count Rows(gyou(0) & ":" & gyou(1)).Select Selection.Delete Shift:=xlUp End Sub
- ベストアンサー
- その他MS Office製品
- マクロでオートフィルターの抽出が出来ない
下記のデーターをマクロで作成しましたが、2010/03/01は抽出するが、2010/03/02以降は デバッグが発生して上手くいきません。 どの様にすれば解決できるのか、ご教授お願いします。 現状） ＡファイルのＡ列のオートフィルタオプションで、抽出条件の指定にＢファイルの Ｃ６をコピーして、「Ctrl」+「V」で貼り付け抽出すると2010/03/01の２４時間分の データーが抽出されます。2010/03/02を抽出するとデバッグが発生する。 データーの詳細） Ａファイルに「元データー Sheet」があり、Ａ６～Ａ４４６４７に、 １ヶ月分の日付が記載されてます。 （Ｂ６～Ｂ４４６４７には、２４時間を１分間隔でのデーターがあります） Ａ列の日付は、2010/03/01～2010/03/31のデーターがあり、 「セルの書式設定」を確認すると、「標準」設定で表記されてます。 オートフィルタによりＡ列の、各１日分のデーターを抽出させます。 Ｂファイルの「作成日指定 Sheet」のＢ３に2010/3/1を入力すると Ｃ６には「=$B$3」で「2010/03/01」と表示する様に「セルの書式設定」 「ユーザー定義」で「yyyy/mm/dd」を選択してます。（Ｃ３６まで設定） 以下Ｃ７に「=$B$3+1」で、Ｃ８には「=$B$3+2」で、Ｃ３６までで「2010/03/31」 と表示させてます。
- ベストアンサー
- その他MS Office製品
- オートフィルタについて
オートフィルタで２つの項目を抽出する方法はありますでしょうか。 Ａ Ｂ Ｃ １ ねこ 白い ２ ねこ 黒い ３ いぬ 白い ４ ねずみ 青い ５ かめ 緑 ６ 鳥 黒い 上のような表でＢ列の「ねこ」と「いぬ」の行を同時に表示する方法は ありますでしょうか。（上の表だと結果３行分表示する。）
- ベストアンサー
- オフィス系ソフト
- Ｅｘｃｅｌで検索ウィンドウを表示させたい
Ｅｘｃｅｌでマクロを使ってボタン（検索ボタンみたいなのを作って）を押すと検索ウィンドウが開いて検索できるようにしたいのですがどうすればいいでしょうか？また、検索をブック全体にかけると違うページが開いてしまうので検索した後に元のページに戻す方法も一緒に教えて欲しいのですが。 もう一つお願いします。 ゴルフのスコア表を作っているのですがある打数の人を検索して一覧で表示したいのですが方法はあるでしょうか？超初心者ではありませんがまだまだ初心者です。教えて下さいお願いします。
- 締切済み
- その他（ビジネス・キャリア）
- エクセルのオートフィルターの使い方
エクセル2010で1000行程度の表からオートフィルターで必要な情報を抽出しているのですが、該当する条件を▼セルで探すのも面倒なので、所定のセルに条件を入力したらオートフィルターで抽出できる方法があれば教えてください。
- ベストアンサー
- Excel（エクセル）
- フィルタオプションをマクロで
１ テキストを読み込んで並べ替えなどして 表（１行目はタイトル）を作り、 フィルタをかける（マクロ） 2 フィルタオプションで必要なデータを抽出 その際に日付を手入力する (例 Ａ列（毎回決まった列） 2005/4/1以上 降順) 3 その後の作業（マクロ） このように１のマクロを起動して その後 ２を手作業して 更に３をマクロを 起動すると言う方法をとっていますが ２の内容もマクロで作って 「日付」だけを 入力するように求められて それを入力するだけで その後の作業も自動で行うことは出来るでしょうか？
- ベストアンサー
- オフィス系ソフト
- Excelのオートフィルタでデータ抽出するマクロについて
オートフィルタで指定した期間のデータ抽出のマクロを作成しているのですが上手くいきません。 例えばA列に １０月２９日 １１月１日 １１月３日 １１月５日 と日付を入力しており、B列、C列にデータを入力していたとして D列１行目に１０月３１日、D列２行目に１１月４日と入力し D列１行目からD列２行目までと指定したデータを抽出するマクロを教えていただけませんか。 マクロ初心者で、困っております。どうかよろしく御願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル・オートフィルタを使わず関数で抽出をするには
excelのデータで、該当する項目のある行のみの抽出をオートフィルタもマクロも使用せずに、関数で行う方法があれば教えてください。 A B 1 桃太郎 123456 2 猿 122222 3 キジ 123555 4 桃太郎 122245 … 1000 桃太郎 002145 ↑このような表で「桃太郎」だけを抽出したいのです。 イメージとしては、ボックスに「桃太郎」と入力するだけで結果が一覧として出るようなものを作りたいのです。 さらにＢ列が昇順に並び替えされていると、なおよいのです。 随時更新するデータなので、その都度の最新の表が欲しいのです。 オートフィルタ→並べ替えをすれば簡単なのですが、エクセルを全く使えないような人がいる職場環境でして、教えるのが面倒というのとデータがぐちゃぐちゃになったら困るので、誰でも簡単にできる方法はないものかと考えています。 また環境的にマクロはあまり使いたくないのです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルで成績に順位をつける方法
グラウンドゴルフの成績順位を決める場合、次のルールがあります。 １）スコアの少ない（小さい数字）のが上位 ２）スコアが同数の場合、「１打」（ホルインワン）が多い人が上位 ３）スコアが同数で、「１打」も同数の場合、「２打」の多い人が上位 ４）スコア、「１打」、「２打」も同数の場合は、同一ランクとする 下記はの「順位」はRANK係数でつけた場合ですが、これを→にする方法をご教示下さい。 氏名 スコア １打数 ２打数 順位 →修正 Ａ 66 4 12 1 1 Ｂ 66 3 14 1 2 Ｃ 71 3 14 3 3 Ｄ 72 3 15 4 4 Ｅ 72 2 10 4 5 Ｆ 74 3 9 6 7 Ｇ 74 3 11 6 6
- 締切済み
- Windows 7