Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1220to1224
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten ausblenden

Spalten ausblenden
Peter
Hallo zusammen,
ich suche ein Makro, was eine Spalte ausblendet, wenn ab Zeile 3 nichts mehr steht. Und das für die Spalten B bis DA (jede Spalte muss für sich selbst betrachtet werden).
Ggf. rufe ich das Makro in einer Schleife 30 mal auf...
Hat jemand einen Rat?
Peter

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
30 ?
27.07.2011 20:02:33
Matthias
Hallo Peter
Wie kommst Du denn auf 30 mal ?
Spalte"B" bis Spalte"DA" sind nicht nur 30 Spalten
Buchstabendreher ?
Gruß Matthias
Hab nicht gezählt, aber schlecht
27.07.2011 20:11:02
Peter
Geschätzt. :-)
AW: Hab auch nicht gezählt ...
27.07.2011 20:22:34
Gerd
Hallo Peter!
Sub Spalten_ausblenden()
Dim lngCol As Long
For lngCol = Columns("B").Column To Columns("AD").Column
If Cells(Rows.Count, lngCol).End(xlUp).Row
Gruß Gerd
AW: Spalten ausblenden
27.07.2011 20:16:18
mpb
Hallo Peter,
wenn die Zellen wirklich leer sind, versuche mal
Sub Ausblenden()
For i = 2 To 30
If Cells(2, i).End(xlDown).Row = 65536 Then
Columns(i).Hidden = True
End If
Next i
End Sub
Gruß
Martin
Anzeige
AW: Spalten ausblenden
27.07.2011 22:00:06
Peter
Hallo zusammen,
vielen Dank für Eure Hilfe!
Bei meinem Problem funktioniert die Lösung von Dir, Martin, am besten. Weiß auch nicht, bei den anderen Makros bleiben immer Spalten stehen.
Viele Grüße
Peter

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige