Results of 1 - 1 of about 4268 for オートフィルタ (0.004 sec.)
- [[20091217142227]]
- #score: 4243
- @digest: d5b67e38943898a3ac346b43056c2812
- @id: 46817
- @mdate: 2009-12-17T05:42:21Z
- @size: 748
- @type: text/plain
- #keywords: sheet13 (2814), 在下 (1973), autofiltermode (1529), トフ (771), autofilter (757), オー (659), コレ (553), ルタ (553), レク (504), にオ (468), フィ (463), ィル (440), activesheet (344), 一括 (309), worksheets (266), クシ (237), ート (230), 複数 (228), rouge (202), 設定 (197), 一度 (154), 現在 (145), worksheet (140), 世話 (139), 定で (134), ショ (131), マク (127), ロを (116), クロ (114), のシ (110), ョン (101), 下記 (99)
- 『複数のシートのA1にオートフィルタを設定する方法』（ぱにゃ）
いつもお世話になっております。 複数のシートの1行目めオートフィルタをいっぺんにかけるマクロを教えてください。 現在下記の様にマクロを組みましたが、Sheet1にしかオートフィルタが設定できません。 Sheet1〜Sheet13まで一度にオートフィルタを掛けたり外したりすることは可能でしょうか。 Worksheets.Select If ActiveSheet.AutoFilterMode = False Then Range("A1").AutoFilter End If ---- ActiveSheetは一つだけです。 Sheetsコレクションに対してすべて一括では設定できないのでは? Dim sh As Worksheet For Each sh In Worksheets If Not sh.AutoFilterMode Then sh.Range("A1").AutoFilter Next (ROUGE) ---- ROUGEさま ありがとうございます。 出来ました。... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/200912/20091217142227.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97068 documents and 608366 words.
訪問者：