我有一个电子表格,它通过下拉框跟踪任务,其中包括值B、G、Y、A和N/A。每种状态的数量都是通过count语句在工作表顶部计算的。
我希望添加另一个下拉框以上的每一节使用相同的上述。所以你可以为一个团队选择N/A。当为团队选择N/A时,我需要一段行也被设置为N/A并隐藏行。
我正在努力理解我应该增加什么来设置单元格到N/A
私有子Worksheet_Change(ByVal目标作为距离)
If Range("G13") = "N/A" Then将单元格E14-E22设置为N/A,并隐藏行14 - 22
'Range("14:22").EntireRow.Hidden = True'
Else
Range("14:22").EntireRow.Hidden = False
End If结束子对象
触发单元格的详细信息如下
目标触发细胞G13细胞Row 14 - 22
目标触发细胞G23细胞射程行24
靶触发细胞g 25
细胞Row 26 - 27
目标触发细胞G28细胞Row 29 - 30
目标触发细胞G31
细胞Row 32 - 34
靶触发细胞G35细胞Row 36 - 38
靶触发细胞G39细胞射程行30-41
靶标触发细胞G42细胞Row 43 - 44
目标触发细胞G45细胞Row 46 - 49
目标触发细胞G50细胞射程51-54行
目标触发细胞G55细胞射程56-57行
目标触发细胞G58细胞射程59-61行
靶触发细胞G62细胞Row 63 - 68
目标触发细胞G69细胞射程行70-83
靶触发细胞G84细胞射程行85-87
目标触发细胞G88细胞Row 89-97
目标触发单元G98信元距离99-104行
目标触发细胞G105细胞射程行106-111
目标触发细胞G112细胞射程113-115行
目标触发细胞G116细胞Row 117-118
目标触发细胞G119细胞射程行120-124
目标触发细胞G125
小区范围126-128
目标触发细胞G129
小区范围130-137号
目标触发细胞G138细胞Row 139 - 145
目标触发细胞G146细胞Row 147
发布于 2018-05-27 23:28:53
如果你的触发单元是G13,G23,G33等等,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("G:G")) Is Nothing And _
(Target.Row Mod 10) = 3 And _
Target.Row >= 13 Then
On Error GoTo meh
Application.EnableEvents = False
With Target.Offset(1, -2).Resize(9, 1)
If Target.Value2 = "N/A" Then
.Value = "N/A"
.EntireRow.Hidden = True
Else
.Value = vbNullString
.EntireRow.Hidden = False
End If
End With
End If
meh:
Application.EnableEvents = True
End Subhttps://stackoverflow.com/questions/50557280
复制相似问题