Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
920to924
920to924
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Simple Prozedur - Wo ist der Fehler?

Forumthread: Simple Prozedur - Wo ist der Fehler?

Simple Prozedur - Wo ist der Fehler?
07.11.2007 18:03:00
Sebastian
Hallo Experten!
Es wäre super, wenn ihr mir bei folgendem Problem helfen könntet: Ich habe eine Tabelle, in der in Spalte 50 entweder leere Zellen oder ein "x" steht. Ich möchte eine simple Routine durchlaufen lassen, die mir ab Zeile 8 alle Zeilen, in denen ein "x" steht, löscht. Folgenden Ansatz habe ich mir ausgedacht:

Sub AuswahlLoeschen()
Dim lngx As Long
For lngx = 8 To Range("AX65536").End(xlUp).Row
If Cells(lngx, 50) = "x" Then Rows(lngx).Delete Shift:=xlUp
Next
End Sub


Irgendwo ist leider hier der Wurm drin. Er löscht zwar einige der Spalten, aber nicht alle. Hoffentlich erkennt einer den Fehler und kann mir weiterhelfen. Das wäre wirklich eine große Hilfe.
Vielen Dank im Voraus und beste Grüße
Sebastian

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Simple Prozedur - Wo ist der Fehler?
07.11.2007 18:11:18
Hajo_Zi
Hallo Sebastian,
beim löschen von Zeilen sollte man von unten nach oben arbeiten.

AW: Simple Prozedur - Wo ist der Fehler?
07.11.2007 18:16:00
Sebastian
Hallo Hajo,
Danke schon mal!
Was du sagst, leuchtet ein. Und wie mache ich das? Geht dann die for, next Schleife überhaupt noch?
Gruß, Sebastian

Anzeige
AW: Simple Prozedur - Wo ist der Fehler?
07.11.2007 18:14:20
Ralph
Hallo,
ich bin kein Experte, aber das hier sollte funktionieren:

Sub AuswahlLoeschen()
Range("A1").EntireRow.Insert
ende = Cells(Rows.Count, 1).End(xlUp).Row
For i = ende To 2 Step -1
If Cells(i, 50) = "x" Then
Rows(i).Delete
End If
Next
Range("A1").EntireRow.Delete
End Sub


Viele Grüße,
Ralph

Anzeige
AW: Simple Prozedur - Wo ist der Fehler?
07.11.2007 18:23:33
Sebastian
Danke habe es jetzt hinbekommen!
Gruß Sebastian
;

Forumthreads zu verwandten Themen

Wo ist der Fehler?
Bernd

Einen schönen guten Morgen,
folgendes Problem habe ich:
Wie Ihr in der Tabelle sehen könnt, ist Andy auf platz 4 und Hery und Bernd auf Platz 5.
Wo ist da der Fehler in der Formel?
Tabelle2

 ABCD12PlatzNameverlorenhilfsspalte134Andy        1,30 €...
30.08.2008 07:15:00
Thread-ID: 1006008
3 Beiträge
wo ist der fehler?
stefan

Hallo,
ich habe eine spalte mit domainnamen (z.b domain.de oder domain.net). ich will daraus den wert ermitteln. wenn .de-domain, dann 1 ansonsten 1,5
habe folgende formel: =WENN(FINDEN(".de";$B2);1;1,5)
leider wirft er bei nicht .de-domains einen fehler aus und schreibt nicht 1,5 h...
09.12.2008 11:57:11
Thread-ID: 1031321
8 Beiträge
Formel: Summe= Monat, Jaht und Text
Frank

Hallo, bräuchte mal eure Hilfe.
Habe eine Tabelle und möchte nur die Anzahl des Textes die in A stehen
aber nur von bestimmtem Jahr und Monat
es wird erst in M der Monat gesucht den ich in B2 eingebe
dann das Jahr in M das ich in F1 eingebe
und nun der Text der in A steht.
14.12.2008 10:38:00
Thread-ID: 1032734
2 Beiträge
Zahl im Text herausfinden vba
Harald

Hallo im Excelforum,
ich möchte aus einer Zelle in der Text und Zahlen stehen, eine sechstellige Zahl finden deren erste 3 Zahlen immer gleich sind zb 208xxx und das mit vba. In Spalte vier steht der Text und in Spalte 9 sollte dann nur noch die Zahl stehen.
mfg
Harald
30.12.2008 16:07:13
Thread-ID: 1036013
22 Beiträge
KW Funktion funktioniert nicht
Peter

Hallo Excelfreunde
Ich bekomme in einer Datei die KW Funktion nicht hin.
Bei mir zu Hause funktioniert die Ausgabe der jeweiligen Kalenderwoche.
Die Analysefunktion muss dafür per Add in angewählt werden.
Dann "=KALENDERWOCHE(A1205)" eingeben - fertig.
Aber im Betrieb läuft...
14.03.2009 19:26:55
Thread-ID: 1060238
4 Beiträge
Anzeige
wo ist der fehler?
Hirschi

Sub mal4() Dim a As Integer For a = 1 To 100 If Cells(a, 1).Caption "" And Cells(a, 1).Caption Mod Cells(a, 2).Caption = 0 Then Cells(a, 3).Caption = CLng(Cells(a, 2)) / 5 * 4 Else Cells(a, 3).Caption = "" End If Next End Sub
Vielen Dank für eure Hilfe! Gruss Hirschi
27.03.2009 12:46:02
Thread-ID: 1064581
9 Beiträge
Anzeige
wo ist der fehler?
Emil

Hallo zusammmen
könnt ihr mir sagen wo hier der Fehler ist?
=WENN(L12="";RANG(C12;C$12:"C"$&Zeile(11+C9));"")
C$12:"C"$&Zeile(11+C9) darf man einen Bereich so formulieren?
in diesem falle müsste das dann geben den Bereich C12:C20
Gruss Emil
06.04.2009 15:14:56
Thread-ID: 1067119
6 Beiträge
Anzeige
wo ist der fehler?
Michel

Hallo
=SUMMENPRODUKT((A1:A1000)="Neue Formatdaten)"*((D1:D1000)="ZugriffLevel0"))
Vielen Dank für eure Hilfe!
Gruss Michel
08.05.2009 14:05:10
Thread-ID: 1073889
4 Beiträge
wo ist der Fehler?
Reto

Hallo zusammen
bekomme mit dieser Formel nur die Fehlermeldung #Wert..
=SUMMENPRODUKT((JAHR('einmalige Bestellungen'!D2:D5000)=Gesamtübersicht!A6)*1)
in D2:D5000 stehen Daten, in A6 ist 2004
wieso geht das nicht?
Vielen Dank für eure Hilfe!
Gruss Reto
15.05.2009 14:03:32
Thread-ID: 1075467
4 Beiträge
Wo ist der Fehler?
Jay

Hallo,
ich bin noch nicht so bewandert mit Schleifen, habe vesucht ein Textfeld einzublenden, falls folgende Zellenwerte Null sind, das klappt aber leider nicht, ist da vielleicht ein Fehler drin?
If Worksheets("Tabelle1").Cells(10, 11) = "0" Then
If Worksheets("Tabelle1").Cells(11...
21.05.2009 14:51:53
Thread-ID: 1076559
12 Beiträge
Formel interpretiert Feldwerte als Text
pietsch.st@gmx.de

Hallo Forum,
habe Werte in vier Zellen. Die Werte stammen jeweils aus folgender selbstgeschriebener Funktion mit Rückgabewert Long:
= Anz_Unf($B$2, "Arbeitsunfall", "3","e").
Die Werte dieser Formel sind im Feld als Zahl dargestellt und sind korrekt. Als Zahl gemäß Excel "Format-Zel...
08.07.2009 22:59:54
Thread-ID: 1087292
3 Beiträge
Text als Formel
chrissey

Hey Leut,
hab folgendes Problem:
Hab in Spalte C folgenden Text:
50*3,2+8,4
möchte nun diesen Text in Spalte F berechnet haben. Wie mach ich das,
weil =C1 oder ="="&C1 geht net.
Grüße und DANKESCHÖÖÖÖN schon mal
09.08.2009 18:29:54
Thread-ID: 1094551
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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