![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
No.1ベストアンサー
- 回答日時:
こんにちは!
質問では列数が少ないので単純にB列~E列までのループが簡単だと思います。
Sub Sample1()
Dim j As Long
For j = 2 To 5 'B列~E列まで//
If Cells(2, j) < Range("F1") Then
Columns(j).Hidden = True
End If
Next j
End Sub
※ 再表示の操作も必要になると思いますので、
↓の3行が再表示のコードになります。
Sub 再表示()
ActiveSheet.Columns.Hidden = False
End Sub
こんな感じではどうでしょうか?m(_ _)m
再表示まで記載いただき、とても助かりました!
同じような内容になるのですが、またマクロについての質問を投稿することになりそうですので、お時間がございましたらそちらの方にもご回答いただけると嬉しく思います。
この度は本当にありがとうございました。
No.2
- 回答日時:
この程度なら何とか
Sub Macro1()
'Application.ScreenUpdating = False
Dim n As Long
Columns("A:F").EntireColumn.Hidden = False
For n = 5 To 2 Step -1
If Cells(2, n).Value < Cells(1, 6).Value Then
Columns(n).Hidden = True
End If
Next n
'Application.ScreenUpdating = True
End Sub
動作確認できたら2か所ある’は外してください
ご指導いただいた通りに設定するとできました!
同じような内容になるのですが、またマクロについての質問を投稿することになりそうですので、お時間がございましたらそちらの方にもご回答いただけると嬉しく思います。
この度は本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Visual Basic(VBA) Excelにて、指定した日の午後にファイルを開いたらsheet1に UserForm1を表示させたい 2 2022/05/31 20:53
- Excel(エクセル) Excelで質問です! 現在マクロを勉強中の初心者です。 以下のような表から、会社名が空白のもの以外 2 2022/06/14 12:16
- Excel(エクセル) Excelのマクロについてご教授ください 2 2023/02/25 09:43
- Visual Basic(VBA) 列 A に同じ日が2つが必要です。 1 2023/03/28 07:25
- Excel(エクセル) 表示形式、文字列セル(列)に数式を入力するには マクロ 1 2022/09/18 10:53
- Excel(エクセル) 隣り合っていないセルを まとめて税込表示したい 8 2022/09/25 14:32
- Visual Basic(VBA) 【マクロ】表への繰り返し転記について 1 2022/11/19 16:30
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) 【困っています2】VBA 追加処理の記述を教えてください。 2 2022/08/26 11:42
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELにて複数列を同条件(色)...
-
行数が不規則な一週間ごとの合...
-
シート保護の状態で行の追加を...
-
エクセルの関数について(日付で...
-
エクセルで行挿入した際、自動...
-
【初歩】エクセルでのマクロ(...
-
[Excel VBA]空白セル以外に連番...
-
エクセルでマクロを実行し、最...
-
エクセルで空白以外のセルの値...
-
エクセルVBA 複数列をコピーす...
-
エクセル VBA 指定の範囲内をコ...
-
エクセル マクロ 貼り付け先が...
-
エクセルで縦に長い表を印刷
-
特定の桁数を抽出
-
エクセルのマクロ、AVERAGEIFを...
-
Excelの非表示列も含めてコピー
-
一行おきにコピーするマクロが...
-
エクセルで反転コピー
-
EXCELマクロ 最下行のセルの数...
-
A1セルに入力したら、入力時間...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELにて複数列を同条件(色)...
-
一行おきにコピーするマクロが...
-
エクセルで行挿入した際、自動...
-
行数が不規則な一週間ごとの合...
-
Excelの非表示列も含めてコピー
-
エクセル マクロ 貼り付け先が...
-
シート保護の状態で行の追加を...
-
エクセルで表示された値だけ行...
-
エクセルで空白以外のセルの値...
-
エクセル VBA 指定の範囲内をコ...
-
エクセルの関数について(日付で...
-
[Excel VBA]空白セル以外に連番...
-
エクセルで反転コピー
-
【初歩】エクセルでのマクロ(...
-
エクセルで縦に長い表を印刷
-
エクセルVBA 複数列をコピーす...
-
マクロで値がある列までコピー
-
Excel VBAで日にちを入力して線...
-
《エクセル2000》A列・B列の和...
-
マクロ ScrollColumn について
おすすめ情報