###前提・実現したいこと
マクロを使ってフィルターを使いたいのですが、72回分のマクロの対策に困っています。(写真は3人分ですがこれが72人分まで続いています)
※6人後にで1列のスペースをあけて区切ってあります。
6人スペース6人スペース6人スペース.....みたいな感じです
###該当のソースコード
Sheets("統合").Columns("A:S").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("C78:D79"), CopyToRange:=Range("A88:B88"), Unique:= _ False Sheets("統合").Columns("A:S").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("E78:E79"), CopyToRange:=Range("C88:F88"), Unique:= _ False Sheets("統合").Columns("A:S").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("i78:j79"), CopyToRange:=Range("g88:h88"), Unique:= _ False Sheets("統合").Columns("A:S").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("k78:k79"), CopyToRange:=Range("i88:l88"), Unique:= _ False これが2回分なのであと70回も繰り返すのが大変で、、、
###補足情報(言語/FW/ツール等のバージョンなど)
excel 2010を使っています。
データは別シートから拾ってきます。
回答4件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。