Salt la conținutul principal

Cum se blochează sau deblochează celulele pe baza valorilor dintr-o altă celulă din Excel?

Autor: Siluvia Ultima modificare: 2024-09-14

În unele cazuri, poate fi necesar să blocați sau să deblocați celulele pe baza valorilor dintr-o altă celulă. De exemplu, aveți nevoie ca intervalul B1: B4 să fie deblocat dacă celula A1 conține valoarea „Acceptare”; și să fie blocat dacă celula A1 conține valoarea „Refuz”. Cum poți face pentru a o realiza? Acest articol vă poate ajuta.

Blocați sau deblocați celulele pe baza valorilor dintr-o altă celulă cu cod VBA


Blocați sau deblocați celulele pe baza valorilor dintr-o altă celulă cu cod VBA

Următorul cod VBA vă poate ajuta să blocați sau să deblocați celulele pe baza valorii dintr-o altă celulă din Excel.

1. Faceți clic dreapta pe fila foaie (foaia cu celule pe care trebuie să o blocați sau să o deblocați pe baza valorilor dintr-o altă celulă) și faceți clic Afișați codul din meniul cu clic dreapta.

2. Apoi copiați și lipiți următorul cod VBA în fereastra Cod.

Cod VBA: Blocați sau deblocați celulele pe baza valorilor dintr-o altă celulă

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A1") = "Accepting" Then
        Range("B1:B4").Locked = False
    ElseIf Range("A1") = "Refusing" Then
        Range("B1:B4").Locked = True
    End If
End Sub

faceți clic pe Vizualizare cod și introduceți codul în modul

3. apasă pe Alt + Q tastele simultan pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, când introduceți valoarea „Acceptare” în celula A1, intervalul B1: B4 este deblocat.

la introducerea unei valori specifice, intervalul este deblocat

Când introduceți valoarea „Refuzare” în celula A1, intervalul specificat B1: B4 este blocat automat.

la introducerea unei alte valori specifice, intervalul este blocat

o captură de ecran cu kutools pentru excel ai

Deblochează Magia Excel cu Kutools AI

  • Execuție inteligentă: Efectuați operații cu celule, analizați date și creați diagrame, toate conduse de comenzi simple.
  • Formule personalizate: generați formule personalizate pentru a vă simplifica fluxurile de lucru.
  • Codare VBA: Scrieți și implementați codul VBA fără efort.
  • Interpretarea formulei: Înțelegeți cu ușurință formulele complexe.
  • Traducere text: spargeți barierele lingvistice din foile de calcul.
Îmbunătățiți-vă capabilitățile Excel cu instrumente bazate pe inteligență artificială. Descarcă acum și experimentați eficiența ca niciodată!

Articole pe aceeași temă:

Cele mai bune instrumente de productivitate de birou

🤖 Kutools Ajutor AI: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  invoca Kutools funcţii...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele
Utilizare Kutools în limba preferată – este compatibilă cu engleză, spaniolă, germană, franceză, chineză și peste 40 de alte limbi!

Îmbunătățiți-vă abilitățile Excel cu Kutools for Excelși experimentați eficiența ca niciodată înainte. Kutools for Excel Oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...


Office Tab Aduce interfața cu file la Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!