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
1300to1304
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
1300to1304
1300to1304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen löschen, die Buchstaben enthalten

Zellen löschen, die Buchstaben enthalten
25.02.2013 16:47:17
Stefan
Hallo Zusammen,
ich habe folgendes Problem. Ich habe einen csv-Export, den ich bereinigen müsste. In der Tabelle https://www.herber.de/bbs/user/84045.xlsx
ist das Problem dargestellt.
Der Export aus einem Tool wird in Excel verschoben dargestellt. Ich müßte die Ausleitung so bereinigen, das der Text aus den Spalten F - ? gelöscht wird und die Zahlen die in den Zellen danch einsortiert waren, wieder an den richtigen Platz rücken. Das Problem ist auch, das alles im Format Standard vorliegt.
Wie kann man das denn am geschicktesten lösen. Hier wäre ein Makro angesagt, da die Ausleitung immer wieder neu bearbeitet werden muss.
Vielen Dank schon mal für Eure Hilfe.
Gruß
Stefan

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen löschen, die Buchstaben enthalten
25.02.2013 17:00:23
Daniel
Hi
probier mal folgenden Code in der Exceldatei (getestet mit deiner Beispieldatei:
Sub test()
With Range(Cells(1, 6), Cells.SpecialCells(xlCellTypeLastCell))
.Replace "Testtext", True, xlWhole
.SpecialCells(xlCellTypeConstants, 4).Delete shift:=xlToLeft
End With
End Sub
Gruß Daniel

AW: Zellen löschen, die Buchstaben enthalten
25.02.2013 17:02:03
Daniel
wenn du generell alle Zellen mit Text unabhängig vom Inhalt löschen willst, dann auch so:
Sub test()
With Range(Cells(2, 6), Cells.SpecialCells(xlCellTypeLastCell))
.SpecialCells(xlCellTypeConstants, 2).Delete shift:=xlToLeft
End With
End Sub
Gruß Daniel

Anzeige
AW: Zellen löschen, die Buchstaben enthalten
25.02.2013 18:30:39
Muge
Hallo Stefan
Folgende Lösung hätte ich im Angebot:
Sub bereinigen()
' Suche nach Zeile die zu lane ist
' Kürze diese und setze die letzden zwei Felder nach vorne
Dim Zeile, Spalte As Integer
' Startpunkt festlegen
Zeile = 5
Spalte = 8     ' H
Do While Cells(Zeile, 5)  ""                  ' Spalte E zum Prüfen auf Tabellenende
If Cells(Zeile, 8)  "" Then               ' Wenn in Spalte h ein Eintrag ist
Do While Cells(Zeile, Spalte)  ""     ' bis ende zeile
Spalte = Spalte + 1
Loop
Application.CutCopyMode = False
Range(Cells(Zeile, Spalte - 2), Cells(Zeile, Spalte)).Copy  ' Die Beiden letzten  _
Felder Kopieren
Cells(Zeile, 6).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False            ' und  einfügen
Range(Cells(Zeile, 8), Cells(Zeile, Spalte)).ClearContents   'Ende der Zeile Lö _
schen
Spalte = 8                                              ' Spaltenzeiger zurü _
cksetzen
End If
Zeile = Zeile + 1               ' Nächste Zeile Prüfen
Loop
End Sub
Beachte das die Exel Datei eine .xlsm sein sollte.
Gruß Muge

Anzeige
AW: Zellen löschen, die Buchstaben enthalten
25.02.2013 19:23:32
Hajo_Zi
warum offen, Du hast doch eine Lösung vorgeschlagen oder sehe ich das falsch?

AW: Zellen löschen, die Buchstaben enthalten
25.02.2013 20:18:22
Muge
Hallo Hajo
Danke für den Hinweis!
Bin neu im Forum und offensichtlich noch nicht so vertraut mit den Gepflogenheiten.
Gruß
Muge

AW: Zellen löschen, die Buchstaben enthalten
26.02.2013 08:31:31
Stefan
Hallo Muge,
vielen Dank für Deine Hilfe. Funktioniert perfekt!!!
Gruß
Stefan

306 Forumthreads zu ähnlichen Themen

wenn > Spalte I, dann neue Zeile
Dennis

Hallo Leute,
ich benötige einmal Hilfe eines Experten, da ich noch in den Anfängen stecke.
Ich habe folgendes Problem:
Ich habe eine Liste mit Datensätzen (jeder Datensatz steht für eine Person). Die Datensätze sind unterschiedlich lang. Grds. sind die Datensätze von Spalte A - Spal...
04.09.2008 16:41:00
Thread-ID: 1007458
8 Beiträge
Anzeige
Zeilen mit bestimmten Inhalt löschen
sascha76er

Hallo,
ich möchte immer alle Zeilen via Makro löschen, wenn der Inhalt der Zeile indentisch mit der ersten ist.
Ist das möglich, wenn ja wie?
Vorab vielen Dank
Sascha
08.12.2008 13:35:00
Thread-ID: 1031058
6 Beiträge
wenn zelle gelb, dann ganze zeile loeschen
maxx_1985

Hi zusammen
wie kann man excel das folgende sagen;
wenn in spalte A irgendwo eine gelbe zelle vorkommt, dann loesche mir die ganze ZEILE.
gelb sind naemlich die zwischensummen, die ich raus haben moechte.
danke euch vielmals
gruss
denis
10.12.2008 16:19:09
Thread-ID: 1031735
8 Beiträge
Anzeige
Wenn bistimmte Werte in zwei Zellen dann Zeile ..
Micha

Hallo zusammen,
habe folgendes Problem:
habe eine große Datentabelle (B1:O31407); in dieser sollen diejenigen Zeilen gelöscht werden
in denen sowohl in der Spalte B als auch in der Spalte H der Zellwert "1" ist.
steht in einer der besagten Zellen ein anderer Werte soll nichts...
14.05.2009 08:36:57
Thread-ID: 1074984
4 Beiträge
Zeilen löschen wenn ...
Marion65

Hi zusammen,
habe eine Tabelle hochgeladen, mein Problem ist dort beschrieben.
Gruß Marion
https://www.herber.de/bbs/user/62707.xls
24.06.2009 04:57:02
Thread-ID: 1083974
8 Beiträge
Wenn Zeile doppelt dann löschen
walli

Guten Morgen,
ich möchte gern, wenn eine Zeile in meiner großen Tabelle doppelt vorhanden ist,
löschen.
Die Werte fangen ab Zeile 6 an und sind von Spalte A bis M,
es soll dann die doppelte Zeile nur von A-M gelöscht werden.
mfg walli
24.06.2009 11:29:15
Thread-ID: 1084058
5 Beiträge
Zeile löschen , wenn doppelt, Makro ?
walli

Hallo zusammen,
hatte vorhin geschrieben, leider nicht mehr im Forum.
Ich habe eine große Tabelle, ab Zeile 6 von Spalte A bis M
soll diese kontr. werden ob eine Zeile doppelt (gleich) ist und
diese Doppelte dann von A-M löschen.
Das Ende der Tabelle kann von A6 bis 500 ode...
24.06.2009 12:45:17
Thread-ID: 1084084
4 Beiträge
Zeilen löschen wenn ...
Marion65

Hallo zusammen,
habe mein Problem in der Beispieldatei beschrieben. Für Eure Hilfe wäre ich Dankbar.
Gruß Marion
https://www.herber.de/bbs/user/62728.xls
Ps. Franz hatte mir schon ein Makro gebastelt, doch leider funktioniert es nicht richtig.
Sub BegriffSuchenZeilenLoesc...
24.06.2009 20:27:47
Thread-ID: 1084196
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
4
5
7
2
3
7
4
3
7
9
4
3
6
10
8
4
7
4
8
15
9
11
3
8