Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
516to520
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
516to520
516to520
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spalten ausblenden mit makro

Spalten ausblenden mit makro
17.11.2004 07:56:08
Alex
guten morgen
ich suche ein makro welches beginnend ab spalte "C" in die letzte gefüllte zelle der Spalte guckt was da für ein wert steht!
wenn also der letzte wert in spalte "C" = 0 ist soll EXCEL diese spalte ausblenden und mit Spalte "D" weiter machen wenn der Wert dort auch 0 ist soll er diese auch ausblenden usw... und das solange bis keine Spalten mehr ausgefüllt sind!
wenn der Wert 0 ist soll EXCEL nichts machen!
kann man das realisieren?
grüße

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

Betreff
Datum
Anwender
Anzeige
AW: Spalten ausblenden mit makro
WernerB.
Hallo Alex,
wie gefällt Dir das?

Sub Alex()
Dim laR As Long
Dim i As Integer
Cells.EntireColumn.Hidden = False
For i = 3 To 256
laR = Cells(Rows.Count, i).End(xlUp).Row
If laR = 1 And Cells(1, i).Value = "" Then Exit For
If Cells(laR, i).Value = 0 Then
Columns(i).EntireColumn.Hidden = True
End If
Next i
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
AW: Spalten ausblenden mit makro
17.11.2004 08:25:09
Alex
das gefällt mir sehr gut!
Danke, Danke, Danke, Danke, Danke, Danke, Danke
und noch nen schönen tag
grüße aus rostock
Anzeige

311 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige