Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

34217 / 76732

←次へ　｜　前へ→


	【47725】Re:条件に適合したセルを含む行を非表示させたい。

TosiYo - 07/3/20(火) 23:21 -


	引用なし

	パスワード

▼Kein さん：

横から失礼します。アドバイスお願いします。
数式を埋め込んだ場合、コードの中で"２”があればHiddenと
非表示とすることは分かりましたが、
例えばCells(1，6)に１、２、３等をいれて、"１”の対象のものを
非表示や”３”をいれてその対象を非表示とする場合は
どのようにコードを書けばよいのでしょうか

普通のコード？では
if cells(i,1)value=cells(1,6).value then

>
>Sub A行を非表示()
>　 On Error Resume Next
>　 With Sheets("実行計画書").Range("IV16:IV149")
>　　　.Formula = "=IF($A16=2,1)"　'←の2を１や２や３･･･に指定セルから
　　　　　　　　　　　　　　　'変更できる方法？はどのようにするのでしょう　
>　　　.SpecialCells(3, 1).EntireRow.Hidden = True
>　　　.ClearContents
>　 End With
>End Sub
>

3 hits

▼

【47702】条件に適合したセルを含む行を非表示させたい。 tamachan 07/3/19(月) 18:32