Office: nur bestimmte Spalten einblenden

Hi,

In der Zeile 1 habe ich Benutzernamen stehen.

Per Buttons in einer UF sollen mir nur die Spalten mit dem jeweiligen Benutzernamen angezeigt werden.

Mein Gedanke war den Buttons Variablen(=Benutzername in Spalte 1) zu hinterlegen.
Dann erstmal alle Spalten ausblenden und dann nur die Spalten einblenden die der Variable entsprechen.

Funktioniert das oder gibt es eine elegantere Methode?

:)

 

der Vorschlag geht.
Ich würde nur eine Schleife mache
...=Cells(1,Loi)="Benutzername"

 

Hi Mario,

laufe in einer Schleife über alle Spalten und blende sie in Abhängikeit vom Namen ein (bzw. aus) - nach diesem Prinzip:

Code:

 

Mit Beverlys Code funktonierts!

Danke!

 

Moin,

folgendes Problem ist aufgetaucht:

beim Start der Anwendung soll eine Userform angezeigt werden.
Die Excelmappe soll solange gesperrt bleiben bis ein Button gedrückt wurde und die UF wiede geschlossen wurde.

Hierzu habe ich in dei Arbeitsmappe beim schließen und speichern diesen Code:
Code:

Beim drücken eines Buttons der UF wird dieser Code in einem allgemeinen Modul aufgerufen.

Code:

Dann kommt ein Fehler "Die Hidden-Eigenschaft des Range-Objects kann nicht festgelegt werden"

Das hängt mit dem Protect/unprotect zusammen. Denn ohne kommt keine Fehlermeldung.

 

Hi Mario,

Frage: weshalb soll die Tabelle denn überhaupt geschützt werden? Wenn die Eigenschaft ShowModal des UserForms auf True steht, kann man doch sowieso nicht in der Tabelle arbeiten.

 

War auf False gestellt.
Jetzt kann ich auf das ganze Protectzeugs verzichten.

Danke für den Hinweis!

 

Jetzt ist das Problem mit dem Schützen der Mappe doch noch aktuell.

Einige Bereiche sollen dauerhaft geschützt bleiben.
Allerdings muss ich den Schutz ab und zu aufheben wenn diese Bereiche per VBA im Hintergrund bearbeitet werden sollen. Z.B. das Ausblenden der Spalten. siehe Code oben.

Geschützt werden die Bereiche mit
Code:

wie kann ich jetzt die Mappe wieder für VBA freigeben?

Hab verschiedene Möglichkeiten getestet. (ActiveSheet.Unprotect, etc.)
Die Mappe scheint beim erneuten durchlaufen des Codes nicht freigegeben zu sein.

 

Hi Mario,

was soll nun eigentlich gemacht werden - du vermengst hier 3 verschiedene Dinge miteinander:

- soll das Tabellenblatt geschützt werden?
- soll die Arbeitsmappe geschützt werden?
- soll die Arbeitsmappe freigegeben werden?

 

Hat sich erledigt.
Hing mit den verschiedenen "Schutzstufen" zusammen.