- ベストアンサー
Excel VBA オートフィルタ後、置換
tom04の回答
たびたびごめんなさい。 No.2のコードではオートフィルタモードになっていて、絞り込みがされていなくても すべてのデータが「佐藤」に変わってしまいますので、 ↓のコードにしてください。 Sub Sample3() Dim i As Long, endRow As Long, myFlg As Boolean endRow = Cells(Rows.Count, "B").End(xlUp).Row For i = 4 To endRow If Rows(i).Hidden = True Then myFlg = True Exit For End If Next i If myFlg = True Then Range(Cells(4, "B"), Cells(endRow, "B")).SpecialCells(xlCellTypeVisible) = "佐藤" End If End Sub ※ もっと簡単な方法があるかもしれませんが、 この程度で・・・m(_ _)m
関連するQ&A
- エクセルのオートフィルタ機能について
エクセルのオートフィルタ機能について エクセルのオートフィルタで、オプション機能を使えばそのセルの一部の文字(例「田中太郎、田中次郎」がセルの項目のとき、抽出条件を「田中」+「含む」とする)を含む全てのセルを抽出できますが、オプション機能を使わずに、最初からオートフィルタのリストとしてセルの項目の一部分(例の「田中」)を設定しておくことは可能でしょうか?
- ベストアンサー
- その他(インターネット・Webサービス)
- VBA オートフィルター後のコピー
オートフィルターで抽出された結果をコピーし、別の空白部分のセルへ貼り付けしたいのですが、抽出結果の一部しか貼り付けされません。オートフィルター後の結果をコピペするのはどういう方法(範囲選択方法)がベストなのでしょうか?
- ベストアンサー
- オフィス系ソフト
- EXCELのオートフィルタで罫線が表示されないのを直したい
こんにちわ。 今回の質問は、エクセルのオートフィルタに関することです。 セルを縦に結合していた場合、オートフィルタをすると罫線が表示されないことがあります。 | 名前 | 年齢 | 子供 | ----------- | 田中 | 30歳 | 万次 | ----------- | | | 太郎 | | | | 次郎 | | 佐藤 | 55歳 | 三郎 | | | | 四郎 | | | | ポチ | ----------- 上のような表があった場合、オートフィルタで『子供』の『次郎』だけを探した場合、『佐藤』の名前の上下の罫線が表示されません。 元々表示が無い場所ですから、当たり前なのですが・・・・・・・ コレをどうにかして表示する方法はないでしょうか。 どのような方法でも構いませんので、思い当たる方はご教授頂けると非常にありがたいです。 ネットで色々探したのですが、解決法が見つからず。 もはや不可能な事なのかと半分諦めていますが、何か方法があればヨロシクお願い致します。
- 締切済み
- オフィス系ソフト
- エクセルのオートフィルタ
オートフィルタは空白行または空白セルがあっても データはうまく並べ替えられますか? 以前、並び替えを使った時は空白セルがあったためか 10列程1000行程のデータでしたが、右2列程が 反映されず、データがばらばらになってしまって 作り直すのに苦労しました。今はオートフィルタを 使う時も範囲指定でデータがある範囲を全て選択して います。
- ベストアンサー
- オフィス系ソフト
- オートフィルタで抽出した表の集計
はじめまして。さっそくですが質問させていただきます。 現在、以下のような表があるとします。 行列 A B C 1 日付 名前 金額 2 2006年10月 田中 \1000 3 2006年11月 佐藤 \200 4 2006年11月 田中 \500 5 2006年12月 鈴木 \820 6 2007年 1月 鈴木 \323 7 2007年 1月 田中 \750 ここで、A列にオートフィルタをかけて、表示されるセルのみの総合計はSUBTOTALで取れるのですが、さらにB列の人名ごとの合計を取る方法がわかりません。 例えば2006年11月のみを表示した場合、 行列 C D 9 総合計= ¥700 ←これはSUBTOTAL(9,C1:C6)で解決 10 田中= ¥500 11 佐藤= ¥200 12 鈴木= ¥0 と、出るようにしたいのです。 オートフィルタをかけるのはA列の日付だけではなくD以降にもデータが入力されていてオートフィルタをかける場合があるとしますが人名は3つ(田中・佐藤・鈴木)のみです。 また、実際のデータはとても行数が多いので手作業で可視セルの人名ごとのトータルを毎回打つのは大変ですし、そのデータは多くの人が使うのでオートフィルタをかけるだけで、現在可視状態のセルの総合計・可視状態の田中の合計・可視状態の佐藤の合計・可視状態の鈴木の合計が一度に出るようにしたいのです。 自分としては自作関数を作成し、一応は求める結果が出るようにしたのですが、自作関数を使うとファイルを開く時に「マクロを有効にしますか?」と聞かれてしまうのが難点です。もっと簡単な方法があれば教えていただきたいです。何卒よろしくお願いします
- ベストアンサー
- オフィス系ソフト
- エクセルのオートフィルターを解除できますか?
エクセルのオートフィルターで、 全ての範囲を対象としたく ◎指定した範囲 リスト範囲 検索条件範囲 抽出範囲 は$1:$65536にしたら、 A1のセル以外すべて空白になってしまいました(T_T) オートフィルターなしの状態に 戻す方法はあるのでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセルのオートフィルターについて
エクセル2007を使っています。 オートフィルターで3つのオートフィルターの範囲についてそれぞれオートフィルターを実行することはできないでしょうか。 例えば、A1:E50 A55:E120 A125:E200の3つの範囲についてオートフィルターをかけたいです。 今確認できる環境にないのですが、オートフィルターモードが戻ってしまい、たしかできなかったように記憶しています。 方法があればよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- オートフィルターをVBAで操作
おはようございます。 度々申し訳ございません。 どうしても オートフィルターをVBAで操作させる方法が 見つからなかったため質問します。 やりたいこと A列セルにランダムで年月が入力されている状況にて ①今年の4月~9月までをオートフィルターで 絞り込み ②今年の10月~来年の3月までをオートフィルターで 絞り込み これをやりたいのですが 私がやってみても一月のみでしか選択できず 複数の月の選択のコードが書けませんでした。 すいませんが コードを記載していただけないでしょうか。 宜しくお願い致します。
- 締切済み
- Excel(エクセル)
- 《エクセル2000》オートフィルタとSUBTOTALを使ってデータのチェックをしたいのですが…
いつもお世話になっています。 一行一件で大量のデータが打込まれ、並びに列の最下部から2行あけた後に、SUBTOTAL関数を入れてあるシートがあります。 タイトルのとおり、オートフィルタとSUBTOTALを使ってデータのチェックをしたいのですが、オートフィルタを選択すると、SUBTOTAL関数が入力されているセルまでもがフィルタをかける対象になってしまいます。 おそらくは「フィルタオプションの設定」という所をいじればいいのだと思いますが、「リスト範囲」という所のセル番号を変えてOKを押すと、フィルタそのものが外れてしまいます。(現在はSUBTOTAL関数が入力されているセルも「リスト範囲」の中に入ってしまっています) SUBTOTAL関数が入力されているセルを、オートフィルタの対象にしないためにはどうすればいいでしょうか。
- ベストアンサー
- オフィス系ソフト
- Excelでフィルタをかけた状態でオートフィルタで連番を振りたい
Excelでオートフィルタを設定し、抽出したデータがあります。(ですので表示範囲があります)その抽出したデータのある列に連番を振りたいのですが、非表示ににゅうりょくされてしまうためうまくできません。 またオートフィルタで抽出した範囲の可視セルをコピーすることはできても、再度貼り付けることもうまくできません。 何か方法はないでしょうか。
- ベストアンサー
- オフィス系ソフト
お礼
回答ありがとうございます! 試してみたいと思います。ありがとうございました。