Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
768to772
768to772
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Einblenden von Spalten verhindern

Forumthread: Einblenden von Spalten verhindern

Einblenden von Spalten verhindern
03.06.2006 19:36:40
sammy brasko
Hallo Excel-User,
habe ein kleines Problem, wäre nett wenn Ihr mir dabei helfen könntet:
Ich habe eine Excel-Tabelle mit verschiedenen Daten, mit denen mehrere
Benutzer arbeiten sollen. Nun möchte ich 2 Spalten ausblenden, da diese
Umsatzzahlen enthalten und diese nicht für alle User sichtbar sein dürfen.
Nach dem Ausblenden sollen diese 2 Spalten nur mit Kennwort wieder eingeblendet werden können, alle anderen Spalten sollen frei bearbeitbar sein.
Gibt es hier eine Möglichkeit?
Vorab vielen Dank.
Gruß Sammy
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Einblenden von Spalten verhindern
03.06.2006 20:08:51
Matthias G
Hallo Sammy,

  • Strg+A (alle Zellen markieren), dann Format, Zellen, Schutz, Haken bei "gesperrt" entfernen.
  • Dann die 2 zu schützenden Spalten markieren, Format, Zellen, Schutz, Haken bei "gesperrt" setzen.
  • Dann Spalten ausblenden und Blattschutz setzen.


Aber so kommt man trotzdem an die Daten ohne Blattschutzkennwort: ;-)
Alt+F11 (VB-Editor), ins Direktfenster eingeben:
? [C1] '(falls z.B. Spalte C ausgeblendet ist).
Echten Schutz gibt es in Excel nicht...
Gruß Matthias
Anzeige
AW: Einblenden von Spalten verhindern
03.06.2006 21:37:39
sammy brasko
Hallo Matthias,
Deine Lösung habe ich auch schon probiert, hat nur folgenden Nachteil:
Die Bearbeitungsmöglichkeiten der nicht gesperrten Zellen sind nach Setzen des
Blattschutzes stark eingeschränkt, d. h. beispielsweise stehen dann Befehle
aus der Format-Symbolleiste teilweise nicht mehr zur Verfügung (z.B: zentriert, rechtsbündig usw.)
Gibt es vielleicht als Alternative die Möglichkeit, den Befehl:
"Format - Spalte - Einblenden" zu deaktivieren?
Oder mit Makro bzw. VBA-Script?
Gruß
sammy
Anzeige
AW: Einblenden von Spalten verhindern
04.06.2006 13:37:26
sammy
Hallo Hans,
Danke für Deine Hilfe, genauso etwas habe ich gemeint.
Funktioniert soweit super.
Jetzt müssten nur noch die Makros im Menü "Makros ausführen"
nicht sichtbar sein oder nicht ausführbar sein, da ansonsten
der andere Benutzer das Makro "deaktivieren" ja wieder ausführen kann.
(Ein VBA-Kennwort habe ich bereits vergeben, das Makro wird jedoch
trotzdem ausgeführt)
Habe jedoch wenig Ahnung von VBA :-(
Anzeige
AW: Einblenden von Spalten verhindern
04.06.2006 13:54:46
Tina
hi sammy,
steht doch alles in der beispielmappe.
in der 2. tabelle mit den ID's
nimm ID 186 und blende makros aus
gruss Tina
Makros von außen nicht sichtbar bzw. ausführbar
04.06.2006 14:09:14
Peter W
Servus Sammy,
kopier das Makro aus DieserArbeitsmappe in ein Modul, Bei Beiden Schaltflächen das Makro wieder zuweisen, in der ersten Zeile im Modul fügst du Option Private Module.
Damit kann von außen das Makro nicht mehr gesehen, vergeben und gestartet werden.

"Man muß Gott für alles danken, sogar für Ober- ,Mittel- und Unterfranken"


Anzeige
AW: Einblenden von Spalten verhindern
04.06.2006 15:02:49
HnasHei
Hallo sammy,
neben den Vorschlägen von Tina und Peter eine weitere Variante. Tausch den Code in der Beispieldatei mal gegen diesen:
Sub Menue_aktivieren()
Dim Datei
Dim Passwort As String
Passwort = InputBox("Passwort:", "Makro")
If Passwort = "moin" Then
For Each Datei In Application.CommandBars.FindControls(ID:=887)
    Datei.Enabled = True
    Next
End If
End Sub
Sub Menue_deaktivieren()
Dim Datei
Dim Passwort As String
Passwort = InputBox("Passwort:", "Makro")
If Passwort = "moin" Then
For Each Datei In Application.CommandBars.FindControls(ID:=887)
    Datei.Enabled = False
    Next
End If
End Sub
Gruß
Hans
Anzeige
AW: Einblenden von Spalten verhindern
04.06.2006 15:26:36
sammy
Vielen Dank, insbesondere an Hans. Deine Makros und Erklärungen haben super
geholfen, alles funzt einwandfrei.
Randbemerkung:
Leider bin ich nur ein Unterfranke, der auch noch wenig Ahnung von VBA hat,
dieses habe ich auch in meinem Level erwähnt.
(Das Bearbeiten von IDs und Module sind für mich derzeit noch böhmische Dörfer)
Aber jeder hat doch mal angefangen....
Anzeige
AW: Danke für die rückmeldung...
04.06.2006 16:07:45
HansHei
und pass auf, dass Dich der Spass auch hin und wieder los lässt.
Grüße nach Lohr
Hans
(Ostfriesland)
AW: Einblenden von Spalten verhindern
04.06.2006 15:22:31
HansHei
Hallo sammy,
noch ein Vorschlag, der eher in die Richtung von Peter geht. Füge folgenden Code in Deine Datei in "DieseArbeitsmappe ein. So wird automatisch bein Start deaktiviert und vor den Schließen aktiviert. Die Makros sind nicht direkt aufrufbar.
Private Sub Workbook_Open()
Dim Datei
For Each Datei In Application.CommandBars.FindControls(ID:=887)
    Datei.Enabled = False
    Next
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Datei
For Each Datei In Application.CommandBars.FindControls(ID:=887)
    Datei.Enabled = True
    Next
End Sub
Gruß
Hans
Anzeige
AW: Einblenden von Spalten verhindern
04.06.2006 18:53:34
Matthias G
Hallo Hans,
besser Workbook_Activate() und Workbook_Deactivate verwenden, denn:

  • Ansonsten steht der Menüpunkt bei anderen göffneten Mappen auch nicht zur Verfügung
  • Wenn man die Datei ändert, schließt und bei der Rückfrage nach Speichern auf "Abbrechen" geht, hat man die Menüpunkte auch in der Mappe, in der sie eigentlich unterbunden werden sollten.

Gruß aus Mittelfranken,
Matthias
Anzeige
AW: und wieder was gelernt
04.06.2006 19:59:07
HansHei
Danke Matthias, für den Tip. Habe ausprobiert und dann auch den logischen Unterschied zwischen open/close und activate/deactivate verstanden.
Gruß
Hans
;

Forumthreads zu verwandten Themen

Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Spalten ein und ausblenden
Marion65

Hallo zusammen, ich habe hier eine ExcelTabelle welche zum Ein- und Ausblenden der Spalten kleine + bzw. - Zeichen hat. Wie kann ich diese selber erstellen? Vielen Dank, Marion. https://www.herber.de/bbs/user/55401.xls
15.09.2008 20:09:56
Thread-ID: 1009885
4 Beiträge
Spalten lassen sich nicht auf Breite 0 schieben
Gordon

Moin,
ich versuche gerade per Makro bestimmte Spalten auf die Breite 0 zu schieben. Als es da fr mich unerklärliche Probleme gab, hab ich mal versucht, die Spalten per Hand auf Breite null zu schieben und siehe da, folgende Meldung erscheint: "Objekte können nicht über das Blatt hinausver...
17.09.2008 14:10:57
Thread-ID: 1010385
4 Beiträge
Teilergebnis einer Spalte wird nicht angezeigt
thaake

Hallo,
ich lasse mir die Teilergebnisse verschiedener Spalten anzeigen mit =Teilergebnis(9;V5:V300), was auch überall klappt, aber nur eine Spalte weigert sich. Formatierung ist vollkommen ok, das Anzeigen in einer anderen Zelle mit Verweis auf diese Spalte klappt auch nicht. Summe dagegen...
22.09.2008 11:21:12
Thread-ID: 1011416
2 Beiträge
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Filterergebnisse werden nicht angezeigt
hajo


Hallo zusammen,
wenn ich mit Autofilter einen Filter in VBA setze, wird mir das Ergebnis nicht angezeigt. Wenn ich die gleiche Aktion manuell ausführe bekomme ich das gewünschte Ergbniss. Kann mir jemand helfen?
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter F...
29.10.2008 12:43:42
Thread-ID: 1020236
5 Beiträge
Anzeige
Rechtschreibung: Pop-Up wird nicht mehr angezeigt
Norbert

Hallo,
nach dem Auswählen des Menüpunktes "Extras" - "Rechtschreibung", wird das zugehörige Pop-Up zur Auswahl der Korrekturvorschläge nicht mehr angezeigt.
Nach einem Klick auf die Schaltfläche "Rechtschreibung" ebenfalls nicht mehr.
Ich habe die möglichen Optionen zur Einstellung...
11.11.2008 11:22:22
Thread-ID: 1023480
3 Beiträge
Spalte keine Ansicht und nicht drucken
Frederic

Hallo Zusammen
Hätte eine blöde Frage:
Wie kann ich mit VBA erreichen, dass die Spalte C1:C60 nicht in der Seitenansicht und auch nicht gedruckt wird. Grund: Habe dort Listenvermerke drin.
Für Eure generöse Hilfe danke ich schon im Voraus
Salvus
Frederic
20.12.2008 19:23:00
Thread-ID: 1034447
23 Beiträge
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Tab nicht sichtbar
Timmy

Liebe Excler,
ich habe ein Worksheet erstellt, in welches man ueber entsprechende Buttons ueber die UF rein kann.
Wenn ich auf den Sales-Button druecke, sehe ich nur das Sales Sheet. Wenn ich auf den Purchasing-Button druecke, sehe ich das Purchasing und das Sales Sheet.
Das funkti...
16.02.2009 14:49:00
Thread-ID: 1051149
5 Beiträge
Spalten mit Makro nach Vorgabe ein und ausblenden
Christoph

Hallo,
will mit Hilfe eines Makros eine bestimmte Anzahl an Spalten ein- bzw. ausgeblendet haben. Habe selbiges mal für Zeilen selbst programmiert:
Sub Zeilenausblenden() Rows("9:209").Hidden = True Rows("9:" & (9 + Range("A4").Value)).Hidden = False End Sub
Für Spalten klapp...
09.04.2009 14:44:26
Thread-ID: 1068032
3 Beiträge
Macro Prgramm nicht mehr editierbar/sichtbar
Reimund

Hallöli,
mein Macro funktioniert, aber wenn ich es bearbeiten will ist es nicht mehr aufrufbar.
Wo bitte ist der Wurm ?
14.04.2009 23:10:13
Thread-ID: 1068762
8 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Spalten in Excel ausblenden und vor dem Einblenden schützen

Schritt-für-Schritt-Anleitung

  1. Zellen auswählen: Markiere alle Zellen in Deiner Excel-Tabelle mit Strg + A.
  2. Zellen schützen: Gehe zu Format, wähle Zellen, dann den Tab Schutz und entferne das Häkchen bei „gesperrt“.
  3. Spalten auswählen: Wähle nun die Spalten aus, die Du ausblenden und schützen möchtest.
  4. Schutz für ausgewählte Spalten aktivieren: Gehe wieder zu Format, wähle Zellen, gehe zum Tab Schutz und setze das Häkchen bei „gesperrt“.
  5. Spalten ausblenden: Klicke mit der rechten Maustaste auf die ausgewählten Spalten und wähle Ausblenden.
  6. Blattschutz aktivieren: Gehe zu Überprüfen und klicke auf Blatt schützen. Setze ein Passwort, um das Einblenden der Spalten zu sperren.

Mit diesen Schritten kannst Du sicherstellen, dass die ausgeblendeten Spalten nur mit einem Passwort wieder sichtbar gemacht werden können.

Häufige Fehler und Lösungen

  • Spalten werden nicht angezeigt: Überprüfe, ob die Spalten möglicherweise ausgeblendet sind. Du kannst dies tun, indem Du die umgebenden Spalten markierst, mit der rechten Maustaste klickst und Einblenden auswählst.
  • Kann Spalte A nicht einblenden?: Spalte A kann manchmal aufgrund von Formatierungsproblemen nicht sichtbar sein. Stelle sicher, dass Du nicht versehentlich die gesamte Zeile ausgeblendet hast.
  • Bearbeitungsmöglichkeiten eingeschränkt: Nach dem Setzen des Blattschutzes sind einige Formatierungsoptionen nicht mehr verfügbar. Du kannst beim Aktivieren des Blattschutzes festlegen, welche Optionen erlaubt sind.

Alternative Methoden

  • VBA-Makros verwenden: Um das Einblenden zu sperren, kannst Du auch VBA verwenden. Dies erlaubt Dir, die Sichtbarkeit von Spalten dynamisch zu steuern. Ein Beispiel für ein VBA-Skript könnte folgendermaßen aussehen:
Sub SpaltenSperren()
    Columns("C:D").EntireColumn.Hidden = True
End Sub
  • Menüs deaktivieren: Du kannst auch die Menüoptionen für das Einblenden von Spalten deaktivieren, indem Du den Code in „DieseArbeitsmappe“ einfügst.

Praktische Beispiele

  1. Datenanalyse: Wenn Du eine Tabelle mit sensiblen Umsatzzahlen hast, kannst Du die entsprechenden Spalten dauerhaft ausblenden und mit einem Passwort schützen.
  2. Schutz von Formeln: Wenn bestimmte Zellen Formeln enthalten, die nicht für alle Benutzer sichtbar sein sollen, kannst Du diese Zellen ausblenden und sperren, um Manipulationen zu verhindern.

Tipps für Profis

  • Zellen unsichtbar machen: Wenn Du einzelne Zellen ausblenden möchtest, kannst Du die Schriftfarbe auf Weiß setzen, um den Inhalt zu verstecken.
  • Spalten dauerhaft ausblenden: Um sicherzustellen, dass bestimmte Spalten nie sichtbar sind, setze einen VBA-Schutz, der beim Öffnen der Datei automatisch aktiviert wird.
  • Passwortschutz: Verwende ein starkes Passwort, um den Schutz Deiner ausgeblendeten Spalten zu gewährleisten.

FAQ: Häufige Fragen

1. Wie kann ich ausgeblendete Spalten wieder einblenden?
Markiere die Spalten neben der ausgeblendeten Spalte, klicke mit der rechten Maustaste und wähle Einblenden. Wenn die Spalten gesperrt sind, musst Du zuerst den Blattschutz aufheben.

2. Was kann ich tun, wenn ich das Passwort für den Blattschutz vergessen habe?
Es gibt verschiedene Methoden, um den Schutz zu umgehen, jedoch ist es ratsam, das Passwort sicher zu speichern und nicht zu verlieren.

Durch die Anwendung dieser Methoden kannst Du effektiv Spalten in Excel ausblenden und vor unautorisierten Zugriffen schützen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige