Live-Forum - Die aktuellen Beiträge
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
Inhaltsverzeichnis

Leerzellen Löschen

Leerzellen Löschen
Thomas
Hallo zusammen,
folgende Frage:
In Spalte A stehen Kundennummern ( Suchergebnisse aus Formeln)
allerdings mit Leerzellen dazwischen.
In Spalte B möchte ich nun diese Daten wieder einegtragen haben, allerdings ohne die Leerzellen.

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

Betreff
Benutzer
Anzeige
AW: Leerzellen Löschen
20.07.2011 17:03:30
Gerold
Hallo Thomas
Wie wärs mit sowas

Sub test()
Dim i, j
j = 1
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(i, 1).Value  "" Then
Cells(j, 2) = Cells(i, 1)
Cells(i, 1) = ""
j = j + 1
End If
Next
End Sub
Mfg Gerold
Rückmeldung wäre nett.
...Oder manuell 2x sortieren! Gruß owT
20.07.2011 17:38:55
Luc:-?
:-?
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige