Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen löschen/verschieben

Forumthread: Zellen löschen/verschieben

Zellen löschen/verschieben
05.07.2005 11:12:14
Christoph
Hallo Leute,
ich möchte in der Spalte Q alle Zellen die "{NULL" enthalten löschen und alle anschließenden Zellen na links aufrücken lassen.
Hatt jemand eine Idee wie man das macht?
Gruß
Christoph
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen löschen/verschieben
05.07.2005 11:27:58
u_
Hallo,
in ein Modul:

Sub killNull()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To Cells(65536, 17).End(xlUp).Row
If Cells(i, 17) = "{NULL" Then Cells(i, 17).Delete shift:=xlToLeft
Next i
Application.ScreenUpdating = True
End Sub

Gruß
Geist ist geil!
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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