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

Berechnung / leere Zeilen auslassen

Forumthread: Berechnung / leere Zeilen auslassen

Berechnung / leere Zeilen auslassen
FJ
Hallo
Wie muss ich mittels VBA vorgehen, um die Berechnung in der Beispieldatei hinzukriegen?
Das Problem liegt vor allem beim Überspringen der leeren Zeilen.
https://www.herber.de/bbs/user/71140.xls
Danke und Gruss
Frédéric
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Berechnung / leere Zeilen auslassen
19.08.2010 15:03:18
Mike
Hey Frédéric,
wenns nicht zwingend VBA sein müsste, ginge es auch mit
einer Formel .. ;-) =wenn(A13=0; ""; ...)
Gruss
Mike
AW: Berechnung / leere Zeilen auslassen
19.08.2010 15:05:43
FJ
Hallo Mike
Wäre sicherlich eine Variante. Aber ist das auch sinnvolle, wenn ich mehr als 20000 Zeilen habe und das ganze dynamisch ist? Ausserdem müsse ich die erste Zelle pro Pack als Startsaldo defnieren, dann die nächste dazuzählen usw... In einer Wenn-Formel (zumindest für mich) schwierig.$
Gruss
Frédéric
Anzeige
AW: Berechnung / leere Zeilen auslassen
19.08.2010 15:27:42
Mike
Hallo Frédéric,
ich will Dir auf keinen Fall VBA ausreden, aber mit 'ner Formel gehts auch und den
Anfang hast Du ja schon gemacht:
Tabelle1
 ABCDEF
946'200.27   87'505.79      
1041'838.08   41'305.52      
111'415.05   -532.56   -532.56 
12-1'947.61   -1'947.61   -1947.61 
13           
1422'876.27   73'986.12   73986.12 
1521'146.26   51'109.85   51109.85 
1616'289.24   29'963.59   29963.59 
1714'206.91   13'674.35   13674.35 
181'415.05   -532.56   -532.56 
19-1'947.61   -1'947.61   -1947.61 
20           
2122'876.27   29'280.30   29280.3 
2221'146.26   6'404.03      
2316'289.24   -14'742.23      

verwendete Formeln
Zelle Formel
C9 =+C10+A9
C10 =+C11+A10
C11 =+C12+A11
E11 =WENN(A11=""; ""; C12+A11)
C12 =+A12
E12 =WENN(A12=""; ""; C13+A12)
E13 =WENN(A13=""; ""; C14+A13)
C14 =+C15+A14
E14 =WENN(A14=""; ""; C15+A14)
C15 =+C16+A15
E15 =WENN(A15=""; ""; C16+A15)
C16 =+C17+A16
E16 =WENN(A16=""; ""; C17+A16)
C17 =+C18+A17
E17 =WENN(A17=""; ""; C18+A17)
C18 =+C19+A18
E18 =WENN(A18=""; ""; C19+A18)
C19 =+C20+A19
E19 =WENN(A19=""; ""; C20+A19)
E20 =WENN(A20=""; ""; C21+A20)
C21 =+C22+A21
E21 =WENN(A21=""; ""; C22+A21)
C22 =+C23+A22
C23 =+C24+A23

Zahlenformate
Zelle Format Wert
A9 #'##0.00_ ;[Rot]-#'##0.00 46200.27
C9 #'##0.00_ ;[Rot]-#'##0.00 87505.79
A10 #'##0.00_ ;[Rot]-#'##0.00 41838.08
C10 #'##0.00_ ;[Rot]-#'##0.00 41305.52
A11 #'##0.00_ ;[Rot]-#'##0.00 1415.05
C11 #'##0.00_ ;[Rot]-#'##0.00 -532.56
A12 #'##0.00_ ;[Rot]-#'##0.00 -1947.61
C12 #'##0.00_ ;[Rot]-#'##0.00 -1947.61
A13 #'##0.00_ ;[Rot]-#'##0.00  
A14 #'##0.00_ ;[Rot]-#'##0.00 22876.27
C14 #'##0.00_ ;[Rot]-#'##0.00 73986.12
A15 #'##0.00_ ;[Rot]-#'##0.00 21146.26
C15 #'##0.00_ ;[Rot]-#'##0.00 51109.85
A16 #'##0.00_ ;[Rot]-#'##0.00 16289.24
C16 #'##0.00_ ;[Rot]-#'##0.00 29963.59
A17 #'##0.00_ ;[Rot]-#'##0.00 14206.91
C17 #'##0.00_ ;[Rot]-#'##0.00 13674.35
A18 #'##0.00_ ;[Rot]-#'##0.00 1415.05
C18 #'##0.00_ ;[Rot]-#'##0.00 -532.56
A19 #'##0.00_ ;[Rot]-#'##0.00 -1947.61
C19 #'##0.00_ ;[Rot]-#'##0.00 -1947.61
A20 #'##0.00_ ;[Rot]-#'##0.00  
A21 #'##0.00_ ;[Rot]-#'##0.00 22876.27
C21 #'##0.00_ ;[Rot]-#'##0.00 29280.3
A22 #'##0.00_ ;[Rot]-#'##0.00 21146.26
C22 #'##0.00_ ;[Rot]-#'##0.00 6404.02999999999
A23 #'##0.00_ ;[Rot]-#'##0.00 16289.24
C23 #'##0.00_ ;[Rot]-#'##0.00 -14742.23
Zellen mit Format Standard werden nicht dargestellt

Tabellendarstellung in Foren Version 4.28


Gruss
mike
Anzeige
AW: Berechnung / leere Zeilen auslassen
19.08.2010 15:54:36
FJ
Hallo Mike
Irgendwie klappt es bei mir nicht wirklich. Die Idee mit der Formel ist sehr gut, jedoch müsste ich die nichtleeren Zeilen (Spalte C) zuerst einmal von Hand reinschreiben.
Oder sehe ich etwas falsch?
Gruss
Frédéric
andere Formel
20.08.2010 08:33:27
Erich
Hi,
wie wäre es damit? (Formal von C1 nach unten kopieren)
 ABC
1186.678,16  1.001.060,31
2162.849,40  814.382,15
3143.740,44  651.532,75
4135.528,14  507.792,31
5111.304,78  372.264,17
668.539,39  260.959,39
752.762,29  192.420,00
852.151,92  139.657,71
946.200,27  87.505,79
1041.838,08  41.305,52
111.415,05  -532,56
12-1.947,61  -1.947,61
13   
1422.876,27  72.132,78
1521.146,26  49.256,51

Formeln der Tabelle
ZelleFormel
C1=WENN(A1="";"";SUMME(C2;A1))

Spalte E wird nicht gebraucht.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: andere Formel
20.08.2010 09:03:38
FJ
Guten Morgen Erich
Absolut super... genau sowas habe ich gesucht! Vielen herzlichen Dank!!
Somit erübrigt sich meine andere Frage eigentlich. (Die Unklare... x) )
Gruss
Frédéric
AW: andere Formel
20.08.2010 10:37:10
Mike
Hallo Fréderic,
die Spalte E war lediglich zur Nachbildung gedacht. Und in C hättest Du
nichts ergänzen müssen, da ja die Leerfelder klar waren.
Aber es ist ja jetzt gelöst.
Gruss
Mike
Anzeige
;

Forumthreads zu verwandten Themen

Leeren von Textfeldern
Textfeldern

Hallo
brauch mal wieder Hilfe!
in meiner Userform sind einige Textboxen und comboboxen mit Werten zur weiteren Berechnung gefüllt.
jetzt die Frage: Gibt es einen Möglichkeit mit einen CommantButton alle Inhalte der textboxen und Comboboxen mit einem Click zuleeren um sie neu zubefül...
07.08.2008 22:26:00
Thread-ID: 1000114
11 Beiträge
leere Zellen Zählen
Lemmi

Hallo zusammen,
ich habe in einer Spalte A
0
größrer (1;2;..)
und leer Zellen
Wie kann ich denn nur die leeren Zellen zählen?
Gruß
Lemmi
08.08.2008 11:29:00
Thread-ID: 1000221
3 Beiträge
Anzeige
in ComboBox leere Zellen + Duplikate löschen
Uwe

Hi nochmal:
Ich konnte mit folgendem Befehl viel Platz sparen:
With Sheets("Katalog")
UserForm1.cob_produkt.RowSource = "'Katalog'!" _
& .Range("A2:C" & .UsedRange.Rows.Count).Address
End With
Das Problem:
A2: A
A3: B
A4: -leer-
A5:...
26.08.2008 14:56:01
Thread-ID: 1004819
2 Beiträge
in ComboBox leere Zellen + Duplikate löschen
Uwe

Hi nochmal:
Ich konnte mit folgendem Befehl viel Platz sparen:
With Sheets("Katalog")
UserForm1.cob_produkt.RowSource = "'Katalog'!" _
& .Range("A2:C" & .UsedRange.Rows.Count).Address
End With
Das Problem:
A2: A
A3: B
A4: -leer-
A5:...
26.08.2008 14:58:00
Thread-ID: 1004820
4 Beiträge
Leere Zellen
Florian

Hallo,
ich habe folgendes Problem:
Über ein Makro (weiter unten) möchte ich eine Auswertung machen. Die Daten stehen in der Tabelle „Fall 1“.
Als Ergebnis möchte ich die gesamte Zeit haben. Die Zahlen sind aber als Text formatiert. Deshalb multipliziere ich die Zellen mit 1, damit...
01.09.2008 12:27:48
Thread-ID: 1006400
2 Beiträge
Bitte um Excel Hilfe / Wenn & Leere Zellen
Hans

Hallo Leute,
ich hoffe mir kann hier jemand helfen, da ich vergeblich versucht habe dahinter zu kommen.
Folgendes, ich habe eine Arbeitszeitübersicht in der ich die Arbeitszeit ausrechnen will und der Übersichtlichkeit wegen an Tagen an denen ich nicht arbeite die Zelle leer bleibt.
02.09.2008 15:53:00
Thread-ID: 1006840
7 Beiträge
in einer Spaöte leere Zellen ausblenden
medion53

Hallo, vielleicht kann mir jemand helfen...
Ich habe eine Tabelle A, gefüllt mit Werten bzw Formeln, die Tabelle A verwende ich als Liste für Datengültigkeit. leider bekomme ich die Leerzellen nicht weg...habe gegoogelt und eine Formel gefunden.
http://www.excelformeln.de/formeln.html...
05.09.2008 10:40:00
Thread-ID: 1007607
7 Beiträge
Leere Zellen Überspringen
Michael

Moin zusammen,
habe ja gestern durch euch einige Probleme lösen können:-) Danke nochmal.
Ich habe einen einfachen Makro erstellt, um den gesamten Inhalt eine Arbeitsmappe zu markieren, um die Werte dann in eine andere zu kopieren.
Range("A2:AD2").Select
Range(Selection, Selectio...
11.09.2008 10:06:00
Thread-ID: 1008990
5 Beiträge
Gültigskeitsprüfung mit leerer Zelle
Franz

Guten Abend!
Habe 9 Spalten mit Dropdowns gefüllt. Wie bekomme ich den nachfolgenden Code (Quelle: Archiv) eleganter hin, dh. ohne for next Schleife und dadurch schneller. Der Datenbereich heistt "Printarea".
Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer For i =...
14.09.2008 20:56:00
Thread-ID: 1009627
11 Beiträge
Anzeige
VBA- Autofilter - leere Zeilen löschen
Asits

Hallo,
ich habe in der Spalte "A" Kundennummern stehen.
Ich will per Makro / Autofilter die kompletten Zeilen
derjehnigen Kunden löschen, die noch keine Kundennummer haben.
wie mache ich das ?
Vielen Dank vorab!
17.09.2008 08:48:00
Thread-ID: 1010225
5 Beiträge
Abbruch eines Makros bei Erreichen e.leeren Zeile
Josef

Guten Morgen!
Ich muß regelmäßig Textdateien in ein Arbeitsblatt einlesen lassen.
In dem nachfolgenden Makro Markierung_I werden die Zellen von I1 bis I10000 markiert und danach in diese Zellen die nachstehende Formel reinkopiert.
Wenn ich jedoch z.B. nur 180 Zeilen einlesen lassen...
18.09.2008 06:46:00
Thread-ID: 1010577
7 Beiträge
Button soll Zelle prüfen ggfs. Zellbereich leeren
André

Hallo Leute,
vollgendes Problem:
Ich habe einen CommandButton, der folgendes machen soll:
***
Wenn Click, dann prüfe Wert in Zelle D6
wenn Wert = "frei"oder "krank" oder "Url", dann leere Zellen im Bereich D7:D43
wenn Wert= "früh", dann schreibe in Zelle D21:D23 "Mittag...
18.09.2008 14:29:48
Thread-ID: 1010740
10 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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