標題: [發問] 當沒勾選則隱藏 [打印本頁]

---

作者: blithely1017    時間: 2017-2-20 10:17     標題: 當沒勾選則隱藏

請問假設Sheet A總共有5個項目，有勾選的項目顯示，沒勾選的項目隱藏
該如何做到?

[attach]26688[/attach]  [attach]26689[/attach]

---

作者: rouber590324    時間: 2017-2-20 14:40

Sub 列自動隱藏()
    Sheet2.Select
    Range("A1").Select
    For i = 2 To 6
    With Sheet2
    If Not (Trim(Sheet1.Cells(i, 2)) = "V") Then
    .Rows(i).Hidden = True
    Else
    .Rows(i).Hidden = False
    End If
    End With
    Next
End Sub

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)