Live-Forum - Die aktuellen Beiträge
Datum
Titel
03.12.2023 22:09:46
Bereits bestehende Formeln in Neue Zeilen übertragen
03.12.2023 22:06:16
OT: Wer war vor Einführung ....
03.12.2023 20:16:30
Listbox mit Eingabe füllen
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
316to320
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten beim Aktivieren der Tabelle ausblenden

Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:04:41
Fritz
Hallo und guten Morgen VBA-Experten,
wer kann mir dabei helfen, in einer meiner Excel-Mappen folgendes zu realisieren:
Ich möchte erreichen, dass in einem Tabellenblatt, in diesem Fall der Tabelle "AW3" bestimmte Spalten eines Bereichs immer beim Aktivieren der Tabelle ausgeblendet, nach dem Verlassen der Tabelle aber wieder alle Spalten eingeblendet sind. Ausgeblendet werden sollen die Spalten im Bereich von Spalte C bis Spalte AK, wenn in diesen Spalten beim Öffnen in der Zeile 11 ein "x" eingetragen ist.
Für eure Hilfe danke ich im Voraus.
Mfg
Fritz

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:17:07
Nepumuk
Hallo Fritz,
folgenden Code in das Klassenmodul der Tabelle:


Option Explicit
Private Sub Worksheet_Activate()
Dim spalte As Integer
For spalte = 3 To 37
If Cells(11, spalte) = "x" Then Columns(spalte).Hidden = True
Next
End Sub
Private Sub Worksheet_Deactivate()
Dim spalte As Integer
For spalte = 3 To 37
Columns(spalte).Hidden = False
Next
End Sub


Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk
Anzeige
AW: Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:23:27
Fritz
Hallo Nepumuk,
vielen Dank für die schnelle und kompetente Hilfe.
Gruß und schönen Sonntag noch
Fritz

301 Forumthreads zu ähnlichen Themen

Es wird nur die Formel angezeigt, nicht der Text
Oswald

Hallo an die guten Geister,
hab mal wieder ein Problem.
In der angeängten Datei in B41 hatte ich das Problem das nicht der Text angezeigt wird sondern die Formel.
https://www.herber.de/bbs/user/54704.xls
Habe ich dadurch gelöst das ich das Selbe noch mal in einer anderen Datei...
18.08.2008 14:47:05
Thread-ID: 1002609
4 Beiträge
Textfeld wird nicht komplett gedruck
Peter

Hallo Leute,
folgendes Problem tritt bei mir auf: ich habe auf einem Tabellenblatt ein relativ großes Textfeld. Dieses geht nicht über die von Excel angezeigten Seitenränder hinaus. Trotzdem wird nicht alles gedruckt. Andere Grafiken, wie näher am Rand sind, werden aber gedruckt. Das was vo...
25.08.2008 14:08:02
Thread-ID: 1004450
4 Beiträge
Kommentar-marker mit drucken??
joerg

Hallo,
Ist es möglich beim drucken eines Tabellenblattes die kleinen roten Dreiecke, die das vorhandenseins eines Kommentars anzeigen, mitzudrucken?
Ich weiss natürlich dass man die Kommentare als solches drucken kann, allerdings interessiert mich wirklich nur, ob es einen Kommentar gib...
04.09.2008 15:55:00
Thread-ID: 1007447
2 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
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

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige