false の行を非表示にしようとしています。
現在、私は持っています
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("B10:B13") = False Then
Target.EntireRow.Hidden = True
End If
End Sub
false の行を非表示にしようとしています。
現在、私は持っています
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("B10:B13") = False Then
Target.EntireRow.Hidden = True
End If
End Sub
範囲内の各セルを反復処理し、その値を次のようにテストしてみてください
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim c As Range
For Each c In Range("B9:B13")
If Not c.Value Then
c.EntireRow.Hidden = True
End If
Next c
End Sub
編集:あなたが求めている結果を達成できる別の方法は、チャートからシリーズを削除することだと思います
Dim n As Long
With ChartObjects(1).Chart
For n = .SeriesCollection.Count To 1 Step -1
With .SeriesCollection(n)
If .Name = "" Then
.Delete
End If
End With
Next n
End With