No.2ベストアンサー
- 回答日時:
勘違いをして回答してしまいました。
「テーブル書式を挿入して、そのテーブルで」という質問でした。
ならば、次のようなので、対応するかもしれません。
Sub Macro2()
tbcount = ActiveSheet.ListObjects.Count
If tbcount > 0 Then
For i = 1 To tbcount
If Not ActiveSheet.ListObjects(i).AutoFilter Is Nothing Then
If ActiveSheet.ListObjects(i).AutoFilter.FilterMode Then
MsgBox "テーブル" & i & "は、絞り込まれています"
Else
MsgBox "テーブル" & i & "は、絞り込まれていません"
End If
End If
Next i
End If
End Sub
AutoFilterを解除するのは、AutoFilterをかけているFieldを選んで
そのFieldの位置(列番号)を指定するだけでOKです。
下は、"テーブル1"で列3のAutoFilterを解除するもの
ActiveSheet.ListObjects("テーブル1").Range.AutoFilter Field:=3
ActiveSheet.ListObjects(1).Range.AutoFilter Field:=3
この回答へのお礼
お礼日時:2015/10/22 12:10
2回も回答頂きましてありがとうございます。
このようなコードになるとは私には考えもつきませんでした。
素晴らしいです。ホント、ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel VBA ユーザーフォーム 複数のユーザーフォームの閉じ方。 2 2022/04/27 11:29
- Visual Basic(VBA) VBAユーザーフォームでテキストボックスについて。 1 2022/05/31 12:23
- Excel(エクセル) EXCEL マクロで行を挿入して貼り付けようとするとエラーになる。 2 2022/05/24 09:43
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Visual Basic(VBA) [Excel VBA] このコードでは行の挿入や行の消去をすると13のエラーが出てしまう。 3 2022/12/09 00:29
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る EXEの実行内容の結果によって、戻り値を0か1かで返したい 1 2023/07/04 16:40
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る バッチからEXEの結果を受け取りたいのですが、 下記のバッ 1 2023/07/04 15:13
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
『列名 '担当者CD' があいま...
-
ExcelVBAについて
-
Accessで別mdbのテーブルをコピー
-
オラクルデータベースへの更新方法
-
HTMLのテーブルの行数が多くな...
-
Access2003VBA リンクテーブル...
-
DataGridViewに複数テーブルの...
-
ExcelVBAからAccessMDB内のテー...
-
VBとアクセスでSQL文に変...
-
SQLを発行とは?クエリの作成と...
-
【ADO】「Execute」を使うと...
-
asp.net mvcを利用する場合の複...
-
MDBテーブルへの追加変更を教え...
-
AccessからExcelへエクスポート...
-
他のMDBのテーブルに追加したい
-
C# OleDbDataAdapter.Fillメソ...
-
[C#] DataGridViewでコンボボッ...
-
DAOでフィールドのデータ型を変...
-
VB.NETからAccess内のデータベ...
-
手動または分散トランザクショ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBとアクセスでSQL文に変...
-
Accessで別mdbのテーブルをコピー
-
他のMDBのテーブルに追加したい
-
SQLを発行とは?クエリの作成と...
-
手動または分散トランザクショ...
-
HTMLのテーブルの行数が多くな...
-
エクセルのテーブルを解除する...
-
ExcelVBAからAccessMDB内のテー...
-
Excel複数シートをaccessへ一括...
-
DataGridの中身をDataSetにテー...
-
CSVファイルのエクスポートでソ...
-
AccessからExcelへエクスポート...
-
.net 複数の主キーを設定する方法
-
『列名 '担当者CD' があいま...
-
COBOLのINVALID KEYが理解でき...
-
アクセステーブル、リンクとロ...
-
ACCESSのテーブル名をリストに...
-
MDBテーブルへの追加変更を教え...
-
【ADO】「Execute」を使うと...
-
ACCESS2010 実行時エラー 2766
おすすめ情報