Zum Hauptinhalt springen

VBA Excel: So schützen Sie eine Zelle in einer Tabelle

Microsoft Excel ist eines der beliebtesten Tabellenkalkulationsprogramme. Die Fähigkeit, Daten zu schützen, ist einer der Hauptvorteile von Excel. Aber manchmal gibt es Situationen, in denen bestimmte Zellen in einer Tabelle besonders geschützt werden müssen. Dazu bietet VBA (Visual Basic for Applications) in Excel praktische Tools.

VBA ist ein leistungsfähiges Automatisierungstool in Excel und ermöglicht das Programmieren verschiedener Aktionen in Tabellen, einschließlich des Zellschutzes. Mit VBA können Sie die Bedingungen definieren, unter denen eine Zelle geschützt oder entsperrt wird. Sie können VBA-Code in einem speziellen Editor in Excel schreiben, der als Visual Basic Editor bezeichnet wird.

Eine der grundlegenden Methoden zum Schutz einer Zelle in einer Tabelle ist die Verwendung einer Funktion Protect. Um eine Zelle mit dieser Funktion zu schützen, müssen Sie einen Zellbereich definieren und Sicherheitseinstellungen festlegen. Sie können beispielsweise angeben, dass eine Zelle vor Benutzeränderungen geschützt ist, oder Sie können nur eine bestimmte Änderungsliste zulassen.

Eine weitere Möglichkeit, Zellen in einer Tabelle zu schützen, besteht darin, bedingte Formate zu verwenden. Bedingte Formate ermöglichen es Ihnen, das Aussehen einer Zelle automatisch entsprechend einer bestimmten Bedingung zu ändern. Sie können beispielsweise angeben, dass eine Zelle schreibgeschützt ist oder für Änderungen gesperrt ist, wenn eine bestimmte Bedingung erfüllt ist.

Schützen einer Zelle in VBA Excel

In Microsoft Excel können Sie die Programmiersprache VBA (Visual Basic for Applications) verwenden, um bestimmte Zellen in Tabellen zu schützen. Der Zellenschutz verhindert, dass der Inhalt und die Formatierung der Daten in diesen Zellen geändert werden, mit Ausnahme der zulässigen Aktionen.

Führen Sie die folgenden Schritte aus, um eine Zelle in VBA Excel zu schützen:

  1. Öffnen Sie den Visual Basic-Editor, indem Sie Alt + F11 drücken.
  2. Wählen Sie in der Projektliste (Project Explorer) die Arbeitsmappe aus, in der sich die Tabelle mit den zu schützenden Zellen befindet.
  3. Fügen Sie im Menü Einfügen ein neues VBA-Modul ein.
  4. Schreiben Sie im Modulfenster eine Funktion, die die Aktionen zum Schutz von Zellen ausführt.
  5. Verwenden Sie die Methoden und Eigenschaften des Range-Objekts, um den Bereich der zu schützenden Zellen anzugeben, z. B.:
Sub ProtectCells()Dim rng As RangeSet rng = ThisWorkbook.Worksheets("Название листа").Range("A1:B5")rng.Locked = Truerng.FormulaHidden = Truerng.Font.Color = RGB(192, 192, 192)'Дополнительные настройки защитыWith rng.Validation.Delete.Add Type:=xlValidateWholeNumber, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="1", Formula2:="100".IgnoreBlank = True.InCellDropdown = FalseEnd WithThisWorkbook.Worksheets("Название листа").ProtectEnd Sub

In diesem Beispiel werden die folgenden Sicherheitseinstellungen für Zellen im Bereich A1:B5 angegeben:

  • Eigenschaft .Locked legt fest, dass Zellen nicht geändert werden können.
  • Eigenschaft .FormulaHidden blendet Formeln in diesen Zellen aus.
  • Eigenschaft .Font.Color ändert die Schriftfarbe in Grau (RGB 192, 192, 192).

Das Beispiel enthält auch zusätzliche Sicherheitseinstellungen:

  • Methoden .Add, .IgnoreBlank und .InCellDropdown legt eine Einschränkung für Werte fest, die in Zellen eingegeben werden können.

Nachdem Sie die Sicherheitseinstellungen angegeben haben, wird die Methode .Protect wendet die angegebenen Einschränkungen auf die zu schützenden Zellen in der Tabelle an.

Wenn Sie dieses Makro ausführen, sind daher alle angegebenen Zellen vor Änderungen geschützt, mit Ausnahme der zulässigen Aktionen, z. B. bei der Bearbeitung dürfen nur ganze Zahlen zwischen 1 und 100 eingegeben werden.

Durch den Schutz von Zellen in VBA Excel können Sie sicherstellen, dass die Daten in Tabellen erhalten bleiben und sicherstellen, dass sie richtig bearbeitet werden.