No.2ベストアンサー
- 回答日時:
標題の「オートフィルターで指定した値」とは、「オートフィルタによる絞り込みの条件とした値」という意味でよろしいでしょうか?
A 列に数値データがあり、それを 1 種類の値のみに絞り込むという場合、次式によりその値を取得できます。この数式は、平均値を求めています。したがって A 列に複数の種類の値が表示されている状態では、小数などを返します。
=subtotal(1,a:a)
文字列などの数値でない値であっても取得するには、マクロを使います。オートフィルタがあるシートのシートタブを右クリック、「コードの表示」から表示されるコードウィンドウに次のコードを貼り付け。
絞り込んだ瞬間ではなく、その次にカーソルを動かした瞬間に、E1 セルに絞り込み条件となっている値を記入します。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Me
If .AutoFilterMode Then
With .AutoFilter.Filters(1)
If .On Then Range("e1").Value = Replace(.Criteria1, "=", "")
End With
End If
End With
End Sub
ご回答ありがとうございます。
>「オートフィルタによる絞り込みの条件とした値」という意味でよろしいでしょうか?
記載して頂いた通りの意味です。言葉があいまいで申し訳ありません。
教えて頂いたSUBTOTAL関数の方でうまくいきました!
ただ、VBAの方も試したのですがうまく動きませんでした。
オートフィルタの絞り込みの値を変更後、別のセルにフォーカスを移動させたのですが、数値が表示されませんでした。。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで指定範囲にある名前と重複した場合に入力できないようにしたい 1 2023/07/13 09:58
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 3 2022/06/10 09:24
- Excel(エクセル) エクセルVBA 任意のセルの選択時、指定のセルの値を表示 1 2023/04/21 08:13
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/28 08:59
- Excel(エクセル) [オートフィルター]機能について 3 2023/02/04 14:32
- 一眼レフカメラ α6400でISOをオートにした設定をロックすることはできますか?Av設定でF値を8にロックできる? 3 2023/08/04 23:26
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 13:13
- Excel(エクセル) エクセルについて教えてください。 1 2023/03/03 08:38
- Visual Basic(VBA) Excelのマクロについて教えてください。 3 2022/06/30 09:36
- WordPress(ワードプレス) 投稿した文書の編集ができません。 1 2022/04/23 23:15
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
Excelのフィルタをかけた項目を別のセルに表示したい
Excel(エクセル)
-
オートフィルタで選択した項目を別セルにて反映 [EXCEL]
Excel(エクセル)
-
Excel オートフィルタのリストを取得したい
Excel(エクセル)
-
-
4
オートフィルタの検索値を、所定のセルから参照(複数条件/部分一致)
Excel(エクセル)
-
5
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
6
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
7
excelオートフィルタの検索条件をセルに入力したい
Excel(エクセル)
-
8
UserForm1.Showでエラーになります。
工学
-
9
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
10
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
11
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
-
12
エクセルVBAでオートフィルター最上行を取得するには
Excel(エクセル)
-
13
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
14
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
15
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
16
VBAでCSVファイルが使用中かどうかの確認
Visual Basic(VBA)
-
17
EXCELのVBA-フィルタ抽出後のセル選択方法
Visual Basic(VBA)
-
18
VBA データ(特定値)のある最終行を取得したい
Excel(エクセル)
-
19
エクセルVBA 配列からセルに「関数式」を一気代入したい
Visual Basic(VBA)
-
20
「選択範囲を解除してアクティブセルを選択」をマクロで行うにはどうすればよいでしょうか
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル②
-
【マクロ】顧客番号にて一致さ...
-
エクセルVBA、別ブックへ転記す...
-
vba Bookを最小にせずに、UserF...
-
エクセルの計算
-
(マクロ)データをAブックからB...
-
Excelでセルの値が同じか...
-
指定文字の間に
-
エクセルでの作業計算方法について
-
エクセルの暗号化なしのバーの...
-
エクセルを使っていて2024/5/15...
-
【マクロ】必要な項目(列)の...
-
エクセル:一覧表に存在する文...
-
Excel
-
エクセル関数を教えてください
-
Googleスプレッドシートでファ...
-
Microsoft 365の Excel を使用...
-
はがきについて。
-
エクセルで 例えば 伊藤と名前...
-
【マクロ】その時、その時で変...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
[関数得意な方]教えて下さい・...
-
Excelにてある膨大なデータを管...
-
[関数について]わかる方教えて...
-
Excel初心者です。 詳しい方、...
-
excelの不要な行の削除ができな...
-
エクセル関数に詳しい方教えて...
-
INDIRECTを使わず excelで複数...
-
[オートフィルタ]で抽出された...
-
エクセルの神よ、ご回答を! エ...
-
エクセル関数に詳しい方、教え...
-
各ページの1番上の表示について
-
Excelで写真のような表を作った...
-
エクセルで不等号記号(≠)が上に...
-
数学 Tan(θ)-1/Cos(θ)について...
-
Excel 2019 は、SPILL機能があ...
-
Excelで全角を半角にしたいので...
-
条件付き書式を教えてください
-
Excel フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報