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

Wenn-Formel durch Cron ersetzen

Wenn-Formel durch Cron ersetzen
11.07.2005 09:23:27
Matthias
Guten Morgen Miteinander
Ich habe in Excel sehr viele Datensätze untereinander gespeichert und möchte nun etwas "Speicher" gewinnen indem ich unter gewissen Kriterien Datensätze löschen. Dies soll so funktionieren. Bei jedem Datei-Aufruf soll das Makro automatisch gestartet werden, in jeder einzelnen Zeile prüfen ob in der Spalte "R" ein "x" steht, wenn ja, soll es in der gleichen Zeile den Inhalt in der Spalte "P", "S", "U", "V", "W" und "X" löschen. Noch einmal:
Das Makro wird gestartet beim Öffnen der Datei, schaut in der Zeile 1 ob in R1 ein "x" steht, wenn ja, werden die Inhalt in Zelle P1, S1, U1, V1, W1 und X1 gelöscht. Dann gehts weiter zur Zeile 2 etc. Bis ans Ende des Files.
Am allerperfektes wärs natürlich noch, wenn während dem Vorgang ein Ladebalken erscheinen würde der den Vorgang zeigt :-)
Vielen Dank für eure Mithilfe!

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

Betreff
Datum
Anwender
Anzeige
AW: Wenn-Formel durch Cron ersetzen
11.07.2005 09:30:07
DMoser
Du musst die 9 gegen deine Spaltennummer tauschen (count, 9) und (cells(i, 9)

Sub wech()
ende = Cells(Rows.Count, 9).End(xlUp).Row
For i = ende To 2 Step -1
If Cells(i, 9) = "x" Then
Rows(i).Delete
End If
Next i
End Sub

p.s. den Ladebalken musste schon mal selber machen wenn du dann nicht klar kommst dann schreibe noch ein Post.
AW: Wenn-Formel durch Cron ersetzen
11.07.2005 09:39:20
Matthias
Vielen Dank für die superschnelle Antwort.
Aber das funktioniert leider noch nicht. Ich möchte ja nicht dass mir eine ganze ZEILE gelöscht wird, sondern nur gewisse Inhalte in der Zeile (nämlich in jeder Zeile die Zelle in der Spalte "P", "S", "U", "V", "W" und "X".
Anzeige
AW: Wenn-Formel durch Cron ersetzen
11.07.2005 09:46:00
DMoser
Ok,jetzt werden die Zellen in den Spalten 16,18,20,21 geleert.

Sub wech()
ende = Cells(Rows.Count, 9).End(xlUp).Row
For i = ende To 2 Step -1
If Cells(i, 9) = "x" Then
Cells(i, 16) = ""
Cells(i, 18) = ""
Cells(i, 20) = ""
Cells(i, 21) = ""
End If
Next i
End Sub

AW: Wenn-Formel durch Cron ersetzen
11.07.2005 10:13:34
Dmoser
Rückantwort bitte

303 Forumthreads zu ähnlichen Themen

Formel automatisch durch Wert ersetzen (vba)
Tanja

Hallo liebe Leute,
Ich hab in meiner excel-Mappe, in den Zellen: M2:M14 Formeln, die eine ganze Zahl als Ergebnis erzeugen.
So, und nun möchte ich das 1. Berechnungs-Ergebnis quasi "einfrieren".
Mein Problem: Ich möchte kein Makro per Hand auslösen müssen, sondern der Code soll voll...
07.08.2008 21:59:00
Thread-ID: 1000110
5 Beiträge
Anzeige
Verknüpfungen durch Werte ersetzen
Horst

Hallo Excel-Freunde!
Wie kann ich bei folgendem Makro angeben, dass nur Verknüpfungen ab der Spalte AA (Spalte 30) durch Inhalte ersetzt werden. Alle anderen Verknüpfungen sollen erhalten bleiben.
Sub update() Dim i As Long For i = 1515 To ActiveSheet.Cells(Rows.Count, 30).End(xlUp).R...
22.02.2009 12:18:26
Thread-ID: 1052805
4 Beiträge
Bei Blattschutz- Formeln durch Werte ersetzen
Mandy

Hallo Ihr Lieben,
habe mal wieder eine Frage: ich lade mit folgenden Code eine Datei und kopiere alle Tebellenblätter aus der Quelle bei mir rein.
Die Tabellenblätter der Quelle, die da eingelesen werden, habe zum Teil untereinander Verknüpfungen (Verweise). Beim einlesen wollte ich abe...
05.05.2009 15:04:37
Thread-ID: 1073102
7 Beiträge
Anzeige
Bestimmte Formeln in durch Werte ersetzen
Steffen

Hallo zusammen,
ich habe folgendes Problem:
ein spezielle Formel (Hyperion Retrieve AddOn(HPVAL)) transportiert externe Daten aus meinem Konsolidierungsprogramm in verschiedene Tabellenblätter einer Exceldatei. Diese externen Daten werden über normale Excelformeln in weiteren Tabellenbl...
21.08.2009 20:57:43
Thread-ID: 1097849
2 Beiträge
Wie Zahlenwerte durch Absolutwerte ersetzen?
Hans

Hallo,
wie kann ich in einer Spalte, die positive und negative Werte enthält, alle Werte durch deren Absolutwert ersetzen. Das ganze muß ich pro Spalte nur einmal machen, es wäre also ausreichend und von Vorteil, wenn das irgendwie mit dem Suchen/Ersetzen Dialog hinzubekommen wäre (ohne Mak...
02.03.2010 14:31:21
Thread-ID: 1142729
3 Beiträge
Wie Zahlenwerte durch Absolutwerte ersetzen?
Hans

Hallo,
wie kann ich in einer Spalte, die positive und negative Werte enthält, alle Werte durch deren Absolutwert ersetzen. Das ganze muß ich pro Spalte nur einmal machen, es wäre also ausreichend und von Vorteil, wenn das irgendwie mit dem Suchen/Ersetzen Dialog hinzubekommen wäre (ohne Mak...
02.03.2010 15:13:40
Thread-ID: 1142750
4 Beiträge
SVERWEISE finden und durch Werte ersetzen
grexx123

HAllo,
wie schon im Betreff beschrieben suche ich ein VBA-Schnipsel, das
1. Alle Sverweise sucht
2. Zellen, in denen ein SVERWEIS steht, mit "Wert" füttern (also kopieren und als Wert einfügen)
Ich weiß, dass man Verknüpfungen lösen kann, jedoch habe ich sowohl die Formel als au...
08.03.2010 13:25:36
Thread-ID: 1144304
6 Beiträge
Formeln in Zellen durch VBA ersetzen
Kuhlmey

Hallo, liebe Excel-Freunde ich habe folgendes Problem:
Mittels VBA setzte ich durch Doppelclick ein „X“ in bestimmte Zellen. Diese Zellen werden
ausgelesen und für nachfolgende Formel benötigt:
{=WENN(ZEILE()>ZÄHLENWENN(Tabelle1!A:A;"WAHR");"";INDEX(Tabelle1!B:B; KKLEINSTE(WENN(...
13.03.2010 14:03:05
Thread-ID: 1145598
18 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
4
17
3
6
4
1
2
3
5
17
2
6
10
3
4
7
8
10
9
2
1
5
13
2
3