Om man har skyddat celler..finns det något sätt att visa celler som är skyddade så att jag ser vilka celler som är skyddade? Alternativ är att man färgar dom innan man slår på skyddet men låt säga att man ej gjort det.
Provat trycka Ctrl G-Special men där finns inget vad gäller skydd!?
Det finns ett ganska enkelt sätt, nämligen att använda villkorsstyrd formatering. Markera det område du vill kontrollera, välj villkorsstyrd formatering och ange följande formel:
=CELL("skydd")=1
Då får de celler som är låsta det format du har angivit.
Står siffran 1 för att se dom som är skyddade och en nolla för att se dom som är redigerbara?
Är nog trög i skallen nu på kvällen men jag får inte till det riktigt.
Jag kommer ej åt villkorsstyrd formatering när jag har skyddet aktiverat!?
Ska jag tillåta formatering av celler innan jag slår på skyddet?
Jag gör följande:
Jag markerar dom cellerna som ej ska skyddas.
Formatera celler och avmarkerar "låst".
Väljer Skydda blad och klickar ok.
(Kommer ej åt villkorsstyrd formatering.)
Tar bort skyddet.
Markera hela bladet (Ctrl A)
Väljer villkorsstyrd formatering.
"Formeln är" =CELL("skydd")=1
Väljer en bakgrundsfärg.
Konstigt, det borde fungera. Kan hända att det krånglar lite eftersom det är ett så pass stort område du har valt. Prova att lösa det mha den här koden som markerar alla celler som är låsta.
Sub markera_locked()
Dim r1 As Range
Dim r2 As Range
Set r2 = Range("A1")
For Each r1 In ActiveSheet.UsedRange
If r1.Locked = True Then
Set r2 = Application.Union(r1, r2)
End If
Next r1
r2.Select
End Sub
Obs! Den här koden markerar A1 oavsett om den är låst eller inte, men det kanske är lätt att kontrollera manuellt. Om du i skyddet har angivet att användaren inte får markera celler så får man i koden lägga in att skyddet först ska tas bort, markering utföras och sedan ska skyddet läggas tillbaka igen.