Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1032to1036
1032to1036
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Ausblenden aller Mitarbeiter außer den Angewählten

Forumthread: Ausblenden aller Mitarbeiter außer den Angewählten

Ausblenden aller Mitarbeiter außer den Angewählten
14.12.2008 18:31:00
Werner
Hallo und guten Abend
Ich möchte in einem Schichtplan alle Spalten ausblenden außer die angewählte Spalte. Per Schaltfläche aus-bzw. einblenden. Die abgespeckte Testdatei mit Erklärung anbei. Hat einer das Problem schon mal gehabt oder weiß Rat?
https://www.herber.de/bbs/user/57614.xls
Danke schon mal im Voraus
Tschüs Werner
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ausblenden aller Mitarbeiter außer den Angewählten
14.12.2008 19:44:21
ransi
Hallo Werner
Wenn du nur die Spalte mit ActiveCell übrig haben willst, versuch es mal so:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit



Public Sub EIN_AUS()
Dim Bereich As Range
With Sheets("Tabelle1")
    If Intersect(ActiveCell, .Range("F19:IV19")) Is Nothing Then Exit Sub
    Set Bereich = .Range(.Cells(ActiveCell.Row, 6), .Cells(ActiveCell.Row, .Columns.Count)).RowDifferences(ActiveCell).EntireColumn
    Bereich.Hidden = Not Bereich.Hidden
End With
End Sub

Zum Einblenden einfach nochmal auf den Button clicken...
ransi
Anzeige
AW: Ausblenden aller Mitarbeiter außer den Angewählten
14.12.2008 20:19:02
Werner
Hallo Ransi
in der Kürze liegt die Würze. Funktioniert einwandfrei . Der Bediener muss nur darauf achten das die Zelle de MA angeklickt ist,sonst passiert logischerweise nichts.
Danke nochmals.
Tschüs Werner
AW: Ausblenden aller Mitarbeiter außer den Angewählten
14.12.2008 20:08:23
Werner
Hallo Tino
Hut ab!
Genauso habe ich mir das vorgestellt. Hast du echt Klasse hinbekommen. Den Aufbau deines Makro muss ich erstmal studieren
Danke.
Tschüs Werner
Anzeige
AW: Ausblenden aller Mitarbeiter außer den Angewählten
14.12.2008 20:19:00
Tino
Hallo,
dass Modul1 kannst Du löschen, war ein Überbleibsel den ich vergessen habe zu löschen.
Gruß Tino

Forumthreads zu verwandten Themen

Auf Knopfdruck neue Zeile in Zelle....
Unwissender
Hallo zusammen,
habe eine VBA-Excel mit dem Rekorder erstellt.
Es handelt sich um eine ToDo-Liste, in der ich immer in einer Zelle in einer Art "Tagebuch" neue Informationen hinzufüge.
So soll es im Idealfall aussehen:
Mit einem Knopfdruck soll in einer ausgewählten Zelle, in der sch...
14.06.2022 16:00:20
Thread-ID: 1887238
3 Beiträge
Auf Knopfdruck neue Zeile in einer Zelle
Unwissender
Hallo zusammen,
(vorab: es gab von mir schon mal eine Anfrage diesbezüglich:
https://www.herber.de/forum/archiv/1884to1888/1887238_Auf_Knopfdruck_neue_Zeile_in_Zelle.html
Aber ich habe noch einen Änderungswunsch in Fett:
Hier nochmals die Anforderung mit der Neuerung in Fett:
ha...
24.10.2022 17:41:29
Thread-ID: 1904158
2 Beiträge
Zeilenumbruch
Emini

Hallo Room,
Ich habe eine Frage, und zwar möchte ich XML-Datei in Excel-Tabelle übertragen. Jedesmal, wenn neue XML-Datei übertragen wird, soll eine leere Zeile erzeugt werden, dann kommt die neue Datei. Natürlich kann man per Hand mit "neue Zeile einfügen" machen, aber es ist zu umständlic...
23.04.2004 21:52:36
Thread-ID: 418575
1 Beitrag
Anzeige
Zeilenumbrüche in zellen finden
Jörg

Hallo,
ich erstelle über VBA aus einer Tabelle verschiedene Texte, die ich als Angebot nutze. Je nach Eingabe in der Tabelle können dabei Angebotspositionen mit einer Größe von nur einer Zeile aber auch solche mit 20 Zeilen und mehr in einer Zelle werden.
Es gibt immer wieder Probleme,...
22.09.2015 15:22:55
Thread-ID: 1448645
5 Beiträge
Anzeige
Problem bei mehreren VBA´s auf einer Zelle
Markus
Hallo Excel Experten,

ich arbeite in zwei Tabellbereichen. In Tab1 sind Eingabezellen, in die ein "x" vorgegeben werden kann. Dieses "x" sorgt dafür, dass in Tab2 ausgeblendete Zeilen eingeblendet werden. Das ganze funktioniert mit VBA:

Private Sub Worksheet_Change(ByVal Target As...
02.10.2003 22:49:41
Thread-ID: 318518
12 Beiträge
@Oberschlumpf: Zeilen im VBA-Code und Modul ausles
ChrisSp

Hi Thorsten,
du hattest vor knapp nem Monat mal was zum Thema Zeilen auslesen bei einem unbekannten Fehler geposten. Ich hatte ja ein bisschen was rumgemäckelt und dir versprochen meine Ideen einzubauen und mich zu melden.
Nun ja - hiermit will ich dies dann auch endlich mal tun.
Er...
13.04.2005 11:47:03
Thread-ID: 598094
2 Beiträge
Excel VBA: Problem mit Hierarchie in Makro
Ronald
Hallo zusammen,

ich brauche eure Hilfe. Eine KI hat dieses Makro für mich geschrieben und es funktioniert grundsätzlich sehr gut. Es gibt nur einen Fehler bei der Behandlung der Hierarchie:

Die oberste Hierarchie (z. B. 1-4-1) soll in Spalte O gesucht werden.

Wird der Begr...
09.11.2025 18:16:24
Thread-ID: 2020781
22 Beiträge
Anzeige
Export Excel > Word
Frau_Kuchen

Ich habe folgende Aufgabenstellung:
1) einige Excel-Dokumente mit Pivot-Daten und Diagrammen
2) Daten und Diagramme werden aktualisiert (von zentraler Exceldatei aus, die die einzelnen Mappen öffnet, bearbeitet und dann wieder schliesst)
2a) Pivotdaten werden ausgewertet und zu meh...
04.01.2008 16:17:29
Thread-ID: 938784
2 Beiträge
Zeilenumbruch erzeugt neue Zeile
Toastie

Hallo zusammen,
als fast Ahnungsloser in Sachen VBA brauche ich eure Hilfe. Ich habe folgende Problemstellung:
In einem Tabellenblatt t1 befindet sich eine Tabelle. Diese soll zeilenweise in ein neues Tabellenblatt t2 kopiert werden. Dabei soll jedoch für jeden Zeilenumbruch in der 6. S...
25.10.2016 15:21:24
Thread-ID: 1521569
4 Beiträge
Daten über mehrere Tab. sortieren
Peter

Hallo und schönen guten Abend zusammen,
ich habe mal eine Frage an die Experten. Besteht die Möglichkeit mittels VBA über mehrere Tabellen zu sortieren und die sortierten Daten in ein neue Tabelle zu kopieren?
Ich habe bis jetzt 2 Tabellen, 2007 und 2008. In jeder Tabelle stehen ca 1150...
22.04.2008 20:45:30
Thread-ID: 971332
8 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum