gegroepeerde rijen (of kolommen) zichtbaar maken in beveiligd werkblad

[SjoerdvanO]

Hoi!

Ik hoop dat iemand mijn vraag beantwoorden kan.
Is het mogelijk om binnen een beveiligd werkblad, een reeks aan gegroepeerde rijen (of kolommen) toch zichtbaar te maken?

Alvast dank voor het meedenken!

Groeten,

Sjoerd

 

[ExcelAmateur]

Heb je er op gezocht?
Het is al meerdere malen behandeld.

 

[SjoerdvanO]

Ja, de antwoorden die ik vond gaan uit van het ontgrendelen van beveiliging van bewuste werkblad. Dat wil ik eigenlijk niet, omdat hierdoor formules in cellen mogelijk overschreven worden.

Dank alvast!!

 

[ExcelAmateur]

Je zou de code ook eens kunnen testen om te zien wat er gebeurd.
Dan zie of je ongelijk of gelijk heb.

 

[HSV]

In de tijd dat de beveiliging er af en weer opgaat, kan jij de formules niet zo gauw overschrijven.

sub hsv()
with sheets("blad1")
 .unprotect "wachtwoord hier"
 .columns(1).clearoutline
 .protect "wachtwoord hier"

end with
end sub

 

[SjoerdvanO]

Beste EA en Harry,

Veel dank voor jullie meedenken. Mag ik jullie eens vragen te kijken naar bestand in bijlage.
Mijn wens zou zijn om het mogelijk te maken een groep van rijen te openen zodat er gewerkt kan worden binnen deze groep zonder dat een formule overschreven kan worden (blauwe kolom).
Daartoe moet dus de beveiliging van het werkblad opgeheven worden (in dit sheet is password leeg gelaten) en er weer op zodra de gegroepeerde rij geopend is.

Mijn kennis gaat niet ver genoeg om dit voor elkaar te krijgen. Ik heb zo'n vermoeden dat jullie vele malen beter ingevoerd zijn.

Willen jullie er nog 1x tijd in stoppen? DANK!

 

[VenA]

Zet deze code in de module van Thisworkbook

Private Sub Workbook_Open()
  With Sheets("Blad1")
    .Protect "1234", UserInterfaceOnly:=True
    .EnableOutlining = True
  End With
End Sub

het wachtwoord is 1234.

 

[SjoerdvanO]

Beste VenA.
Echt onwijs bedankt!!!!
Groet Sjoerd!