Mateusz Zdrenka

Mateusz Zdrenka Administrator baz
danych

Temat: Blokowanie komórek

Witam,

zna ktoś sposób na zablokowania wszystkich komórek w arkuszu, w których znajduje się jakaś funkcja lub odwołanie do innej komórki.
Bartek Borczyk

Bartek Borczyk Operator liczb i
słów

Temat: Blokowanie komórek


Sub sZablokuj()
Dim wks As Worksheet

For Each wks In ThisWorkbook.Worksheets
With wks
If .Visible = xlSheetVisible Then
.Unprotect
.Cells.Locked = False
.Cells.SpecialCells(xlCellTypeFormulas).Locked = True
.Protect
End If
End With
Next wks
End Sub
Bartek Borczyk

Bartek Borczyk Operator liczb i
słów

Temat: Blokowanie komórek

Lub to samo tylko ręcznie.
Mateusz Zdrenka

Mateusz Zdrenka Administrator baz
danych

Temat: Blokowanie komórek

Dzięki za pomoc :)



Wyślij zaproszenie do