Excel VBA中過濾/可見光細胞

Question

假設我有10行數據。我申請了一些過濾器的數據和行號7和9 過濾OR可見。

欲通過數據迴路（10行）和輸出字符串「可見」中的空白欄（假設C欄），僅爲可見的列（即範圍C7和範圍C9）。

Answer 1

選擇一些前10行，以隱藏，然後再嘗試運行這個

Option Explicit 

Sub CheckIfVisible() 

Dim i As Integer, x As Integer 
x = 0 
For i = 1 To 10 
    With Excel.ThisWorkbook.ActiveSheet 
     If .Rows(i).EntireRow.Hidden Then 
     Else 
      .Cells(15 + x, 1) = "Row " & i & "is visible" 
      x = x + 1 
     End If 
    End With 
Next i 

End Sub 

這是那種你要找的循環？
也許你能告訴我們你的循環，這樣我們就可以看到你的問題是什麼？