В настоящее время я работаю над общим документом и считаю, что при использовании Excel 2016 нет способа защитить / незащищенные общие документы. Когда мой документ защищен, я не могу скрыть строки, основываясь на значении определенных ячеек,Могу ли я разрешить запуск макроса в защищенном режиме?
Sub HideBlanks()
Dim rngBlnk As Range
On Error Resume Next
Set rngBlnk = Range("A6:B10").SpecialCells(xlCellTypeBlanks)
On Error GoTo 0
If Not rngBlnk Is Nothing Then
Debug.Print rngBlnk.Address()
rngBlnk.EntireRow.Hidden = True
End If
End Sub