No.1ベストアンサー
- 回答日時:
If ActiveSheet.Range("a10").EntireRow.Hidden = True Then
こうではないでしょうか?
No.2
- 回答日時:
こんばんは。
私には、質問が良く理解できません。
オートフィルタでフィルタリング後に、表示されない行にある(コマンド)ボタンを消すということは、どういうことなのか理解できません。
おそらく、
ボタンのオブジェクトの書式が、
セルにあわせて移動やサイズ変更をする
にチェックが入っていることだと思います。
しかし、こういう状態がデフォルトで成立するとしたら、Excel 2002 でしょうか?
通常は、ありえませんね。通常の設定では、ボタンは、行と連動していませんから、非表示ということはありません。
行が非表示だから、その上で、ボタンが隠れた状態のものを、以下のようにボタンを削除することでしょうか?
Sub Test1()
'フォームのボタン
With ActiveSheet
If .AutoFilterMode Then
If .Buttons(1).TopLeftCell.Rows.Hidden Then
.Buttons(1).Delete
End If
End If
End With
End Sub
Sub Test2()
'コントロールツールのボタン
With ActiveSheet
If .AutoFilterMode Then
If .CommandButton1.TopLeftCell.Rows.Hidden Then
.CommandButton1.Cut
End If
End If
End With
End Sub
なお、ボタンはワークシート上に、それぞれ1個の場合です。2個目は、名称やインデックスが変わりますから、このままのマクロでは使えません。
回答ありがとうございます。
No1さんの回答で解決しました。質問の仕方が悪く申し訳ありません。
エクセル2000で作成中です。意図は行ごとに行に対するボタンがあるので行が表示されない場合はボタンが必要なくなります。消すというのはDELETEではなくHIDDENです。
わざわざプログラムを書いていただきありがとうございました。
又機会がありましたらよろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/06/19 10:08
- Visual Basic(VBA) ExcelのVBAコードについて教えて下さい。 2 2022/06/25 14:04
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/03/25 08:33
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/08 15:45
- Visual Basic(VBA) エクセルのマクロで対象ごとにシート分けしてその内容をセルに書き込みたい 9 2022/08/24 13:23
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/02/17 11:59
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 13:13
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドボタンを押すたびに大...
-
Excel:コマンドボタンの移動
-
エクセルVBA シート上にあるコ...
-
コマンドボタンで「終了ボタン...
-
スクロールしてもボタンを常に...
-
押したボタンの位置取得(共通の...
-
コマンドボタンがあるかどうか...
-
エクセルのコマンドボタンの位...
-
PPTのコマンドボタンがクリック...
-
Accessのコマンドボタンの立体...
-
エクセルVBAでOptionButtonのオ...
-
astahのアクティビティ図の書き...
-
InDesignには「1段階戻る」の...
-
Excelシート上でボタン1つで交...
-
エクセルVBA
-
エクセル既存のコマンドをユー...
-
コマンドボタン 改行したい
-
Wordでドラッグした文字列を括...
-
Accessユーザーフォームでコマ...
-
エクセルのマクロでスライドシ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel:コマンドボタンの移動
-
コマンドボタンを押すたびに大...
-
スクロールしてもボタンを常に...
-
押したボタンの位置取得(共通の...
-
コマンドボタンがあるかどうか...
-
エクセルVBAでOptionButtonのオ...
-
コマンドボタンで「終了ボタン...
-
Excel VBA --- コマンドボタ...
-
エクセルVBA シート上にあるコ...
-
ShowAllDataのエラーを回避したい
-
Accessのコマンドボタンの立体...
-
エクセルVBA
-
EXCELでNo.を変えて印刷したい
-
PPTのコマンドボタンがクリック...
-
マクロ登録ボタンに色をつける
-
実行中の作業を中止させるコマンド
-
エクセルのコマンドボタンの位...
-
[ExcelVBA] コマンドボタンを押...
-
Wordでドラッグした文字列を括...
-
チェックボックスで「いずれか1...
おすすめ情報