Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
504to508
504to508
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten löschen

Forumthread: Spalten löschen

Spalten löschen
27.10.2004 08:34:22
Georg
Hallo,
ich möchte alle Spalten per VBA löschen, die in der ersten Zeile keinen Eintrag enthalten.
Vielen Dank für jede Hilfe.
Grüße
Georg
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten löschen
ChrisL
Hi Georg

Sub t()
Dim iSpalte As Integer
Application.ScreenUpdating = False
For iSpalte = 256 To 1 Step -1
If Cells(1, iSpalte) = "" Then Columns(iSpalte).Delete
Next iSpalte
Application.ScreenUpdating = True
End Sub

Gruss
Chris
AW: Spalten löschen
27.10.2004 08:51:51
Harald
Moin Georg,
probier mal das.

Sub Wegdamit()
For n = 256 To 1 Step -1
If Cells(1, n) = "" Then
Cells(1, n).EntireColumn.Delete
End If
Next n
End Sub

Gruß
Harald
Anzeige
AW: Spalten löschen
27.10.2004 08:53:37
Rolf
Hallo Georg,
das packst du am besten
in eine For..Next-Schleife,
etwa so
For i = 1 to n
if cells(1,i)="" then
columns(i).entirecolumn.delete
end if
next i
Aber erst mal in Testdatei ausprobieren.
FG
Rolf
AW: Spalten löschen/Danke
Georg
Hallo,
vielen Dank an alle.
Hat geklappt.
Grüße
Georg
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige