Это меня действительно сбивает с толку... как так получается, что переменная счетчика "cntr" начинается со значения 11, но в первый раз в цикле она получает значение "102"?
Здесь должно быть "11", и я не понимаю, что происходит.
Вот скриншот codeа рядом с окном debug.print.
Вот code:
введите code здесь
Public Sub show_NNN_expenses()
Dim StartRow As Integer, LastRow As Integer, isCamRow As Integer, ii As Integer, cntr As Integer
StartRow = 11
LastRow = 200
ii = 0
cntr = 11
Debug.Print ("Starting")
'Loop through the rows
For ii = StartRow To LastRow
Debug.Print ("StartRow " & StartRow & " Last Row: " & LastRow & " Current Row " & ii & " Cntr: " & cntr)
'hide rows not "NNN" or "CAM"
isCamRow = InStr(1, Cells(cntr, 1).Value, "CAM")
Debug.Print ("isCamRow " & isCamRow)
If isCamRow > 0 Then
'show row
' Cells(ii, 1).EntireRow.Hidden = False
Else
'hide row
' Cells(ii, 1).EntireRow.Hidden = True
End If
cntr = cntr + 1
Next ii
End Sub
Максимильян
Вопрос задан8 мая 2024 г.