Gå til hovedindhold

Hvordan laver man celle som kun læst i Excel?

I mange tilfælde skal du muligvis forhindre andre i at redigere bestemte celler i dit regneark. Denne artikel indeholder to metoder til at hjælpe dig med at oprette specificerede celler som skrivebeskyttede, så andre ikke kan redigere disse celler undtagen til læsning.

Lav celle som skrivebeskyttet ved at beskytte regnearket
Opret celle som skrivebeskyttet med VBA-kode uden at beskytte regnearket


Lav celle som skrivebeskyttet ved at beskytte regnearket

Du kan kun låse cellerne, som du vil gøre dem til skrivebeskyttet, og derefter beskytte dette regneark for at opnå det. Gør som følger.

1. Klik på i øverste venstre hjørne af det aktuelle regneark for at vælge hele cellerne.

2. Tryk på Ctrl + 1 taster samtidigt for at åbne formater celler dialog boks. Fjern markeringen i afkrydsningsfeltet Låst under boksen Beskyttelse fanebladet, og klik derefter på OK knap. Se skærmbillede:

3. Vælg nu de celler, du vil gøre dem til som skrivebeskyttet (her vælger jeg celler i området A1: C18). Tryk på Ctrl + 1 taster samtidigt for at åbne formater celler dialogboksen, skal du kontrollere Låst under boksen Beskyttelse fanebladet og klik på knappen OK .

4. Klik videre anmeldelse > Beskyt ark. Se skærmbillede:

5. Angiv og bekræft din adgangskode for at beskytte regnearket som vist nedenstående skærmbillede.

Nu er celler i det låste område skrivebeskyttet nu. Når du forsøger at redigere disse specifikke celler inden for området, får du en hurtigboks som vist nedenstående skærmbillede.


Beskyt flere / alle regneark med adgangskode på samme tid i den aktuelle projektmappe:

Microsoft Excel giver dig mulighed for at beskytte et regneark med adgangskode ad gangen. Her kan du bruge Beskyt regneark , Fjern beskyttelse af regneark forsyninger af Kutools til Excel for hurtigt at beskytte eller fjerne beskyttelsen af ​​flere regneark eller alle arbejdsark i den aktuelle projektmappe med adgangskode på samme tid.
Download og prøv det nu! (30-dages gratis spor)


Opret celle som skrivebeskyttet med VBA-kode uden at beskytte regnearket

Hvis du ikke vil beskytte regnearket for at gøre celle som skrivebeskyttet. VBA-scriptet i dette afsnit hjælper dig med at løse dette problem let.

1. Højreklik på arkfanen, du har brug for for at gøre cellen til skrivebeskyttet, og klik derefter på Vis kode fra højreklikmenuen.

2. I åbningen Microsoft Visual Basic til applikationer vindue, kopier og indsæt nedenstående VBA-kode i kodevinduet.

VBA-kode: Opret celle som skrivebeskyttet i Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 4 Or Target.Row = 5 Then
            Beep
            Cells(Target.Row, Target.Column).Offset(0, 1).Select
            MsgBox Cells(Target.Row, Target.Column).Address & " cannot be selected and edited as it is a read-only cell", _
            vbInformation, "Kutools for Excel"
        End If
    End If
End Sub

Bemærk: Denne kode kan bare lave specificerede celler i en kolonne som skrivebeskyttet. I denne kode vil det gøre celle A3, A4 og A5 som skrivebeskyttet i det aktuelle regneark.

3. Tryk på andre + Q taster for at lukke Microsoft Visual Basic til applikationer vindue.

Når du klikker på celle A3, A4 eller A5 i det aktuelle regneark, får du en Kutools til Excel dialogboks som vist nedenstående skærmbillede, og markøren flytter automatisk til den tilstødende celle.

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Very useful!!
This comment was minimized by the moderator on the site
Hi! How about if i want to just make 1 column editable and the rest uneditable? Thanks!
This comment was minimized by the moderator on the site
Hi Jac,
Please click on the column header to select the whole column, then do the steps mentioned in the post to unlock the column cells then protect the worksheet.
This comment was minimized by the moderator on the site
every usefull, thank you with gratitude
This comment was minimized by the moderator on the site
Thanks for the quick guidance.
This comment was minimized by the moderator on the site
Hi



I have mulipe sheets Menu ( option A1& A2) , A1 and A2 and VIEW work sheets ( where i will have BROWSE button) .



1. In menu i will select A1..

2. it will go to VIEW sheet ( which is working fine) till now ..

3. when i click on the BROWSE in the VIEW sheet A1 shee shoulf get displayed and the content present in the cells should be non editable..



Could you please help..
This comment was minimized by the moderator on the site
Good day,
Supposing there is a Command Button (ActiveX Control) in the View sheet. After inserting the below VBA into the worksheet code window, click on the button, in a popping up Kutools for Excel dialog box, specify a password to protect the sheet A1. Then sheet A1 is opened and non editable.

Private Sub CommandButton1_Click()
Dim xSheet As Worksheet
Dim xStr As String
On Error Resume Next
Set xSheet = Sheets("A1")
If xSheet Is Nothing Then Exit Sub
xSheet.UsedRange.Locked = True
xStr = Application.InputBox("Please specify a password to protect the sheet A1", "KuTools for Excel", , , , , , 2)
If xStr = False Or xStr = "" Then Exit Sub
xSheet.Protect xStr
xSheet.Activate
End Sub
This comment was minimized by the moderator on the site
i just want to make few cells of a book locked for input, only they shows the result as i programmed them to do so
This comment was minimized by the moderator on the site
Hey, Thanks a lot for this steps.


However, what if I want to copy the values in the cells that I have locked?
This comment was minimized by the moderator on the site
Dear Yahia,
The locked cells in a protected worksheet can't be copied.
This comment was minimized by the moderator on the site
Very Helpful. Thanks ! :D
This comment was minimized by the moderator on the site
Dear i want to protect the hidden cells from by copying to the new sheet, is there any option in the excel sheet for that. Means no can able to view the formulaes after copying from one sheet to other sheet.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations