Здравствуйте, подскажите что поменять в коде, что б печать шла так же по условия как сейчас, но условие была не одна ячейка, а диапазон, раньше просто было если в ячейке р55 стояло значение, печать шла, сейчас немного стало сложнее, в нескольких ячейках могут быть значения, а строки с ошибками скрыты...нужно что б на печать шло то что не скрыто, вне зависимости от ячейки, если это конечно реально, столбец всегда один и тот же, диапазон от р55 до р100, но среди диапазона могут быть строки с ошибками, но они скрываются с помощью другого макроса, в общем если есть значение, не зависимо от того в какой ячейке, что б шла печать, а если везде ошибки, то соответственно что б не выводилось, именно если по всему диапазону ошибки, то вывода на печать нет, а если среди диапазона есть хоть одно значение, то вывод на печать
Код
Sub printtt()
Dim sh As Worksheet
For Each sh In Worksheets
If Not IsError(sh.Cells(55, 16).Value) Then
If sh.Cells(55, 16) <> "" Then
sh.PrintOut Copies:=1
End If
End If
Next sh
End Sub
в принципе как должен выглядеть макрос, задан диапазон, если в нем есть хоть одно значение, даже если и будут ошибки, идет печать, если в диапазоне только ошибки, вывода на печать нет, просто я не макрописец, ну идея такая