[[20211217114751]]　『フィルタリングされている内容のみコピーしたい&吹x（スーツ君）　ページの最後に飛ぶ

『フィルタリングされている内容のみコピーしたい&数式はコピーせず値だけコピーしたい』（スーツ君）

お世話になっております。

フィルタリングされてセルが非表示になっていて、数式が含まれているExcelから

・フィルタリングされたセルだけをコピーしたい（表示されていないものは無視したい）
・数式はコピーせず、数式によって出された値だけコピーしたい

この2つを行うにはどのようにしたらよいでしょうか

たとえば、A・B・C・Bのフィルターがあり、Aだけを表示させて
Aだけしか含まれないExcelを作りたいです。

かつ、数式によって値が出ていますが、数式はコピーせず表示された値のみをコピーしたいです。

何卒よろしくお願いいたします。

＜使用 Excel：unknown、使用 OS：Windows10 ＞

 えっと、フィルタリングして（オートフィルタじゃないのかな）
 範囲選択しAlt＋；を押す。
 そのままコピーして別の場所に形式を選択して貼り付けで「値」を
 選択して貼り付け

 ということでしょうか？
（コナミ） 2021/12/17(金) 12:40

コナミ様
そうなんですが、その場合フィルタリングで隠れてしまっている行まで
コピーされてしまうので
そちらをコピーしないようにしたいのですが
なにか良い方法はないでしょうか…
（スーツ君） 2021/12/17(金) 12:57

 >Alt＋；を押す

 これ、やりました？
（コナミ） 2021/12/17(金) 13:06

 Sub Sample()
    With Worksheets.Add
        With .Cells(1)
            .Value = "項目1"
            .AutoFill .Resize(, 3), 2
            With .Offset(1)
                Dim i As Long
                For i = 0 To 2
                    .Offset(i).Value = Array("A", "B", "C")(i)
                Next
                .Resize(3).AutoFill .Resize(12), 1
                Dim r
                .Offset(, 1).Resize(12, 2).Value = "=ROW(A1)*COLUMN(A1)"
            End With
        End With
        Stop
        With .UsedRange
            .AutoFilter Field:=1, Criteria1:="A"
            .Copy Worksheets.Add.Cells(1)
            .AutoFilter
        End With
    End With
    Application.CutCopyMode = False
 End Sub

簡単なサンプルを作ってみましたがこれでどうなりますか？
（きまぐれおじさん） 2021/12/17(金) 14:07

コナミ様
きまぐれおじさん様

ありがとうございます。
結論から申しますと、Alt＋；でいけました。

この度はご教授まことにありがとうございました。

（スーツ君） 2021/12/17(金) 18:29

＞結論から申しますと、Alt＋；でいけました。
それをしなくても、
オートフィルタによる非表示セルはコピー対象にならないはずです。
（きまぐれおじさん）の示されたコードを試してもらえませんか？

なお、フィルタではなく手作業で非表示にしたものは、
上記と異なり、コピー対象となります。
非表示が対象外となるのは、フィルタがかかっているときの特徴的な動作です。
（γ） 2021/12/17(金) 21:45

エクセルのバージョンが書かれてないけど・・・。
因みに昔のエクセルは、非表示セルもコピペされて結構不満続出だった記憶が（手動とマクロで挙動が違ってたような）。
（不明） 2021/12/17(金) 22:58

少なくともExcel2003ではそうした振る舞いになっていました。
それより前のもの（Excel2000，Excel97等)については確認未済ですが、
現役で使っている人、いるんでしょうか？

（γ） 2021/12/17(金) 23:15

 オートフィルタでは基本的に可視セルのみがコピーされます。
 (だから、オートフィルタではないのかな？と書きました)
 ただ、過去のバージョンではバグなどで非表示セルもコピーされることが
 あったという記事を読んだことがあります。
 使用者の勘違いでオートフィルタではなかったという場合もあるでしょうし。
 今回はご自身では何度も試したのでしょうし可視セルコピーができていなかったなら
 オートフィルタではなかったということでしょう。

 回答内容は見落とさずに忠実に実行していただきたいとは思いますが。
（コナミ） 2021/12/18(土) 10:29

コメント返信：

[ 一覧(最新更新順) ]

[[20211217114751]] 『フィルタリングされている内容のみコピーしたい&吹x（スーツ君） ページの最後に飛ぶ

[[20211217114751]]　『フィルタリングされている内容のみコピーしたい&吹x（スーツ君）　ページの最後に飛ぶ