- ベストアンサー
【マクロ】複数シートのオートフィルター&ウインドウ固定について
- エクセルで複数のシートに同じ配列の表があります。その際、オートフィルターとウインドウの固定を一気に行う方法を教えてください。
- オートフィルターとウインドウの固定を一気に行うマクロを教えてください。もしくは、マクロを使わない方法があれば教えてください。
- エクセルで同じ配列の表が複数のシートにあります。それぞれのシートにオートフィルターとウインドウの固定を一気に行う方法を教えてください。
- みんなの回答 (3)
- 専門家の回答
関連するQ&A
- オートフィルタ後の、マクロでの値の参照に関して
オートフィルタ後の、マクロでの値の参照に関して 下記を悩んでいます。教えて頂ければ幸いです。 マクロで、あるデーター表から、オートフィルタを使用し、必要なデーターを 抽出し、マクロ内に戻し、その後の計算で使用したいと考えています。 A列、B列、C列にそれぞれ、検索条件を指定し、オートフィルタ後、下記のような状態になります。 参照したい値は、D列になります。 下記のような例では、2.5と2.7の値をマクロ内に戻したいです。 (例:オートフィルタ後) 1行 A▼ B▼ C▼ D 16行 ** ** ** 2.5 20行 ** ** ** 2.7 *2~15行目は見えなくなっています。 *17~19行目は見えなくなっています。 セルを参照し、マクロ内に戻すには、どのような構文(マクロ)の記述が必要でしょうか? 【備考】 ・上記の例では、セルはD16、D20となりますが、抽出条件によっては、行番号が変わってしまいます。 ・抽出後のD列のデーター数は、常に2つです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- オートフィルタのマクロについて
オートフィルタのマクロを組もうとしているのですが、フィルタ条件に別シートのセルの値を入れたいのですが、そこがどうもうまくいきません。 作成したマクロは以下の通りです。 Sub 累計計算マクロ() Dim aRange As Range, bRange As Range, i As Date Set aRange = Sheets("累計").Range("B1") Set bRange = Sheets("累計").Range("B2") i = aRange.Value Sheets("クイーンエステート").Activate Range("A13:L13").Select Selection.AutoFilter Selection.AutoFilter Field:=2, Criteria1:="<=i", Operator:=xlAnd End Sub どなたか助けてください! 宜しくお願い致します。
- ベストアンサー
- その他MS Office製品
- オートフィルタの抽出結果をマクロで表示するには?
A 1000 D 200 A 500 A 1000 B 2000 上表をオートフィルタでA及び1000で絞ると左下に『4レコードで2個です。』と抽出個数が表示されると思いますが、その個数(2個)をマクロを使って表示させるにはどうすればいいでしょうか? マクロの記録でオートフィルタをかけるところまではできるのですが、個数表示で壁にぶち当たっています。 ちなみに1000を検索させて個数を出すという方法もありますが、2行目のデータが他の行にもあるため、データを検索させて個数を導くマクロは作られないので、オートフィルタからのマクロを作成しています。 マクロ初心者のため、分かる方いらっしゃいましたらご教授をお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロでオートフィルターの抽出が出来ない
下記のデーターをマクロで作成しましたが、2010/03/01は抽出するが、2010/03/02以降は デバッグが発生して上手くいきません。 どの様にすれば解決できるのか、ご教授お願いします。 現状) AファイルのA列のオートフィルタオプションで、抽出条件の指定にBファイルの C6をコピーして、「Ctrl」+「V」で貼り付け抽出すると2010/03/01の24時間分の データーが抽出されます。2010/03/02を抽出するとデバッグが発生する。 データーの詳細) Aファイルに「元データー Sheet」があり、A6~A44647に、 1ヶ月分の日付が記載されてます。 (B6~B44647には、24時間を1分間隔でのデーターがあります) A列の日付は、2010/03/01~2010/03/31のデーターがあり、 「セルの書式設定」を確認すると、「標準」設定で表記されてます。 オートフィルタによりA列の、各1日分のデーターを抽出させます。 Bファイルの「作成日指定 Sheet」のB3に2010/3/1を入力すると C6には「=$B$3」で「2010/03/01」と表示する様に「セルの書式設定」 「ユーザー定義」で「yyyy/mm/dd」を選択してます。(C36まで設定) 以下C7に「=$B$3+1」で、C8には「=$B$3+2」で、C36までで「2010/03/31」 と表示させてます。
- ベストアンサー
- その他MS Office製品
- エクセル オートフィルター
オートフィルターについて教えて下さい。 同じシート内で、独立した複数のオートフィルターを用いることは出来ますか。下に示すような場合にAとB列に独立してオートフィルターを設定して、果物を抽出して、CとD列には野菜だけを抽出する。みたいなイメージです。オートフィルターやマクロを用いないやり方で他のやり方でもできる場合は教えて下さい。 A B C D 1 りんご 果物 りんご 果物 2 キャベツ 野菜 キャベツ 野菜 3 イチゴ 果物 イチゴ 果物
- ベストアンサー
- オフィス系ソフト
- オートフィルタの結果を違うブックに貼り付ける
マクロの初心者です。 Excel2003を使用しています。 仕事で作らなくてはならなくなったのですが、思うように動いてくれません。 【A・Bとブックが二つあります。AのブックのセルDにランダムで文字を入力します。その文字をコピーし、Bのブックを開き、オートフィルタでコピーした文字を貼り付けて、抽出します。その結果を上から3行コピーしてAのブックの他のシートに貼り付ける。】 このマクロを作りたいのですが、うまく出来ません。 あまり難しくないマクロで出来ればいいと思います。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- (Excel2003)すぐ左の最後の行までコピーするマクロを教えてください
マクロ初心者です。 表記の件に就き、何卒ご教授の程、宜しくお願いします。 ・エクセルで以下のような表があるとします。 __A__B__C__D→ 1_数量_単価_金額 2_4,000_100_=B3*C3 3_5,000_200_ 4_3,000_120_ 5_5,000_160_ ↓ ・そしてこのAとB列が毎回下に増えるとして、C2セルの数式を B列の最後の行までコピーするマクロを教えて下さい。 (実際は、C2セルにVLOOK関数が入っており、最終行は何千行まであります) 何卒ご教授の程、宜しくお願い申し上げます。
- ベストアンサー
- オフィス系ソフト
- マクロ オートフィルタで困っています。
マクロ オートフィルタで困っています。 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製品
- エクセルのオートフィルタの条件にセルの値を入れる。
エクセルのオートフィルタを使用した際、条件の中に【A月B日以上】【C月D日以下】としたいのですが、その【A月B日】【C月D日】を、それぞれあるセルに入力した値にしたいのですが、どのようにやればよいですか? 当然、毎回日付は変更します。 マクロでできる方法を教えて下さい。 よろしく御願いします。
- ベストアンサー
- オフィス系ソフト
- オートフィルターで抽出されたデータの参照方法について
1000件以上のデータをA,B、C列にオートフィルターをかけて抽出されたデータのA,B、C列およびD列目の値を参照する式を組みたいのですが、当然のことながらオートフィルターをかける都度、表示されるセル番地が変わるので式がくめません。 多分、マクロでコピーしてどこかにペーストすればいいのでしょうが、まったくわかりません。お教えください。
- 締切済み
- オフィス系ソフト
お礼
ありがとうございます。 こちらを参考に求めたいものが完成しました。 またこちらのHPもとても興味深いので、登録させて頂きました。 今回は全社のPL表(約100セクション別)を作成時に利用させて頂きました。 本当に助かりました。