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ランキング
-
コマンドボタンを押すたびに大...
-
スクロールしてもボタンを常に...
-
エクセルVBA
-
エクセル:マクロのコマンドボ...
-
イラストレータで5ボタンのマ...
-
Excel:コマンドボタンの移動
-
エクセル VBA コマンドボタン...
-
コマンドボタンがあるかどうか...
-
EXCELでNo.を変えて印刷したい
-
エクセルVBAでOptionButtonのオ...
-
excel vba のオプションボタン...
-
コマンドボタンがきかなくなる
-
コマンドボタンで「終了ボタン...
-
ワードにタイマーを設定したい
-
MS_AccessからPDFファイルを開...
-
Wordでドラッグした文字列を括...
-
Accessのコマンドボタンの立体...
-
マクロ 実行ボタンを押さずに...
-
EXCELのセルへ、デジタル時計を...
-
Excelを開いた時に表示さ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel:コマンドボタンの移動
-
コマンドボタンを押すたびに大...
-
スクロールしてもボタンを常に...
-
押したボタンの位置取得(共通の...
-
コマンドボタンがあるかどうか...
-
エクセルVBAでOptionButtonのオ...
-
エクセルVBA シート上にあるコ...
-
Excel VBA --- コマンドボタ...
-
エクセルVBA
-
Accessのコマンドボタンの立体...
-
コマンドボタンで「終了ボタン...
-
PPTのコマンドボタンがクリック...
-
EXCELでNo.を変えて印刷したい
-
エクセルのコマンドボタンの位...
-
ShowAllDataのエラーを回避したい
-
[ExcelVBA] コマンドボタンを押...
-
実行中の作業を中止させるコマンド
-
Wordでドラッグした文字列を括...
-
Accessユーザーフォームでコマ...
-
マクロ登録ボタンに色をつける
おすすめ情報