HERBERS Excel-Forum - die Beispiele

Thema: Aktivierung von Berechnungen bei gültiger Passworteingabe

Home

Gruppe

Allgemein

Problem

Die Berechnungen des Arbeitsblattes werden nur dann aktiviert, wenn ein gültiges Passwort eingegeben wird.

Lösung
Nur anhand einer Beipspielarbeitsmappe darstellbar.
ClassModule: DieseArbeitsmappe

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   With ThisWorkbook
      .Names.Add Name:="C0UNTRY", RefersToR1C1:="=3"
      .Names("Country").Visible = False
   End With
End Sub

Private Sub Workbook_Open()
   Application.EnableCancelKey = xlDisabled
   Dim sTxt As String
   sTxt = InputBox("Bitte Passwort eingeben:", , "MeinPasswort")
   If sTxt <> "MeinPasswort" Then Exit Sub
   With ThisWorkbook
      .Names.Add Name:="C0UNTRY", RefersToR1C1:="=Tabelle1!COUNTRY"
      .Names("Country").Visible = False
   End With
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Berechnen

scrollen berechnen Anfangskapital berechnen
Makro/VBA: Neu berechnen bis *Teil 2* Makro/VBA: Neu berechnen bis
Bestimmte Zelle mit Makro berechnen Range-Wert aus der Statistik berechnen
Zeiten (diff. in Monaten) berechnen Auflistung von Zahlen, ohne diese zu berechnen
nach 2 Werten suchen und berechnen Trend/Entwicklung berechnen
zellen berechnen Staus des Berechnens anzeigen
Zwischenzeiten berechnen Pivot - Berechnendes Feld
Allgemeine Frage zur Fehlerbehandlung allgemeine Fragen zu einer Datenbank
XY-Diagramm, Funktionswerte berechnen Werte bereichsweise berechnen
Arbeitstage berechnen Zinsen berechnen in VBA (Fehler)
Kalendarwoche berechnen Anzahl Tage berechnen
Problem mit copy-paste bei manuellem berechnen Matrix / Korridor berechnen
Arbeitstage berechnen Daten aus Pivottabelle berechnen
berechnen mit Combobox Soll eintragen und Zwischenstände berechnen
Doppelte Werte nicht berechnen Zinssatz mit Hilfe des Datums berechnen
Trend berechnen Restliche Tage berechnen
Zwischensumme nicht mitberechnen Bei gleichen Texten Summe berechnen
Überstunden berechnen Dynamisches Diagramm + berechnende Zellen
Formel berechnen? Zellenanzahl eines Bereiches berechnen
allgemein Wie kann ich Exccel beim berechnen *bremsen*?
Abfahrtszeit berechnen Zwischenwerte berechnen
Inhalt+Anzahl berechnen liefertermine berechnen
Rang berechnen summe aus zellen berechnen
Bundesliga Tabellenplatz berechnen ohne Matrix Intervalle berechnen und aufs Tabellenblatt
Arbeitszeit incl. Pausen berechnen Excel bleibt im Berechnen-Modus