Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1700to1704
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
1700to1704
1700to1704
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Schleife - Zwei Zellen multiplizieren

Schleife - Zwei Zellen multiplizieren
01.07.2019 17:07:55
Georg
Hallo,
ich würde gern zwei Zellen miteinander multiplizieren.
Jedoch erhalte ich den Laufzeitfehler '13': Typen unverträglich.
Mein Code ist folgender:
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
Cells(i, 5).FormulaLocal = Cells(i, 3).Value * Cells(i, 4).Value
Next

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
bei mir kommt kein Fehler ... owT
01.07.2019 17:18:18
Matthias
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 17:21:18
onur
Wieso .FormulaLocal?
Cells(i, 5).VALUE = Cells(i, 3).Value * Cells(i, 4).Value
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 17:25:34
Daniel
Hi
in welcher Zeile des Durchlaufs tritt denn der Fehler auf?
schon beim allerersten oder erst später?
welchen Wert hat dann dein i?
Welche Werte stehen in den betroffenen Zellen?
dass du Text nicht miteinander multiplizieren kannst, sollte klar sein.
steht bei dir in Zeile 1 vielleicht eine Überschrift?
solche Aufgaben kann man oft mit Formeln besser erledigen als mit schleifen: 
With Range("E1:E" & Cells(Rows.count, 1).end(xlup).row)
.FormulaR1C1 = "=RC3*RC4"
.Formula = .Value
End with
Gruß Daniel
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 19:29:13
Georg
Hallo,
FormulaLocal, da Kommazahlen berechnet werden.
Ich packe euch mal eine Beispiel-Datei rein. Da sollte mein Problem deutlich werden.
https://www.herber.de/bbs/user/130680.xlsx
Wenn ich per Hand in der Zelle E4 "=(44,44-0)*C4" eintippe, wird der Wert richtig berechnet.
VG
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 19:43:08
onur
Cells(i, 3).Value * Cells(i, 4).Value ?
Spalte 3 enthält nur einen Faktor und Spalte 4 einen Text !
Wie kommst du auf ein Ergebnis von 44,44 ?
Ausserdem: Wo ist denn dein Makro?
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 19:53:55
Georg
Neuer Versuch:
https://www.herber.de/bbs/user/130681.xlsm
Die Ergebnisse aus in der Spalte E erhalte ich durch die erste Formel.
Die auskommentierte Formel beinhaltet den Faktor (die nicht funktioniert).
Anhand dessen, dass die erste Formel funktioniert, sieht man ja das Excel sich nichts draus macht, dass Spalte D Text ist. Oder?
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 20:25:12
onur
Ich habe zwar keine Ahnung, wozu du die Spalte 4 (Rechenweg) brauchst, aber wenn du unbedingt das Ergebnis mit Spale 3 multiplizieren willst, dann geht es so (allerdings ist dann die Formel weg): 
Sub DA11()
'Variablen definieren
Dim i As Integer
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Cells(i, 5).FormulaLocal = "=" & Cells(i, 4).Value
Cells(i, 5) = Cells(i, 5) * Cells(i, 3)
Next
End Sub

Wenn du aber die Formel noch brauchst - so: 
Sub DA11()
'Variablen definieren
Dim i As Integer
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Cells(i, 5).FormulaLocal = "=" & "C" & i & "*" & Cells(i, 4).Text
Next
End Sub

Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 20:38:03
Daniel
Hi
naja was in Spalte D steht, ist jetzt keine Zahl, die du direkt in einer Berechnung verwenden kannst, sondern ein einfacher Text.
wenn du damit Rechnen willst, hast du zwei möglichkeiten:
a) du lässt dir den Text als Formel berechnen. Innerhalb von VBA gibts dafür die Funktion EVALUATE
allerdings benötgit die dann wieder das amerikansische Zahlenformat: 
    Cells(i, 5).Value = Evaluate(Replace(Cells(i, 4).Value, ",", ".")) * Cells(i, 3).Value

b) du berechnest die Formeln nicht in VBA, sondern erstellst aus der Formel in D und der Zahl in C eine entsprechende Formel für die Excelzelle: 
    Cells(i, 5).FormulaLocal = "=" & Cells(i, 4).Value & "*" & Cells(i, 3).Value

Gruß Daniel
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 20:38:04
Daniel
Hi
naja was in Spalte D steht, ist jetzt keine Zahl, die du direkt in einer Berechnung verwenden kannst, sondern ein einfacher Text.
wenn du damit Rechnen willst, hast du zwei möglichkeiten:
a) du lässt dir den Text als Formel berechnen. Innerhalb von VBA gibts dafür die Funktion EVALUATE
allerdings benötgit die dann wieder das amerikansische Zahlenformat: 
    Cells(i, 5).Value = Evaluate(Replace(Cells(i, 4).Value, ",", ".")) * Cells(i, 3).Value

b) du berechnest die Formeln nicht in VBA, sondern erstellst aus der Formel in D und der Zahl in C eine entsprechende Formel für die Excelzelle: 
    Cells(i, 5).FormulaLocal = "=" & Cells(i, 4).Value & "*" & Cells(i, 3).Value

Gruß Daniel
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 20:38:04
Daniel
Hi
naja was in Spalte D steht, ist jetzt keine Zahl, die du direkt in einer Berechnung verwenden kannst, sondern ein einfacher Text.
wenn du damit Rechnen willst, hast du zwei möglichkeiten:
a) du lässt dir den Text als Formel berechnen. Innerhalb von VBA gibts dafür die Funktion EVALUATE
allerdings benötgit die dann wieder das amerikansische Zahlenformat: 
    Cells(i, 5).Value = Evaluate(Replace(Cells(i, 4).Value, ",", ".")) * Cells(i, 3).Value

b) du berechnest die Formeln nicht in VBA, sondern erstellst aus der Formel in D und der Zahl in C eine entsprechende Formel für die Excelzelle: 
    Cells(i, 5).FormulaLocal = "=" & Cells(i, 4).Value & "*" & Cells(i, 3).Value

Gruß Daniel
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 20:38:05
Daniel
Hi
naja was in Spalte D steht, ist jetzt keine Zahl, die du direkt in einer Berechnung verwenden kannst, sondern ein einfacher Text.
wenn du damit Rechnen willst, hast du zwei möglichkeiten:
a) du lässt dir den Text als Formel berechnen. Innerhalb von VBA gibts dafür die Funktion EVALUATE
allerdings benötgit die dann wieder das amerikansische Zahlenformat: 
    Cells(i, 5).Value = Evaluate(Replace(Cells(i, 4).Value, ",", ".")) * Cells(i, 3).Value

b) du berechnest die Formeln nicht in VBA, sondern erstellst aus der Formel in D und der Zahl in C eine entsprechende Formel für die Excelzelle: 
    Cells(i, 5).FormulaLocal = "=" & Cells(i, 4).Value & "*" & Cells(i, 3).Value

Gruß Daniel
Anzeige
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 19:58:19
onur
NOCH EINMAL:
Du willst Spalte 3 mit Spalte 4 multiplizieren und das Ergebnis in Spalte 5 eintragen?
Spalte 3 enthält den Faktor und Spalte 4 einen Text!
Als Excel-Profi müsstest du wissen, dass man Text NICHT mit Zahlen (oder mit sonst was) MULTIPLIZIEREN kann.
AW: Schleife - Zwei Zellen multiplizieren
01.07.2019 22:50:53
Georg
Nabend,
der Trick bestand darin, dass ich für diverse Bereinigungen die Werte als Text ausgeben lasse und vor der Berechnung in Zahlen wandele.
Besten Dank für die Hilfe.

83 Forumthreads zu ähnlichen Themen

Ausgabe zweier Zellen mit SVERWEIS
Andreas

Hallo
Ich möchte mittels SVERWEIS Werte aus Spalte 2 oder wenn sich in dieser Spalte keine Werte befinden aus Spalte 3 ausgeben...
Kann mir da jemand weiterhelfen?
Gruß
Andreas
14.08.2008 11:46:00
Thread-ID: 1001793
4 Beiträge
Anzeige
Mehrere Zellen gleichzeitig farblich markieren
KLAUS

Hallo!
Ich habe eine Tabelle in der von B9 bis V45 in jeder Zelle ein Namenskürzel steht, insgesamt 21 verschiedene.
Jetzt möchte ich alle Kürzel von einer Person, die aber an unterschiedlichen,d.h. nicht zusammenhängenden, Zellen stehen mit wenig Aufwand und Suchaktionen mit einem Arbe...
11.03.2009 12:29:52
Thread-ID: 1059068
7 Beiträge
Tabellenname aus zwei Zellen
Christopher

Hallo Leute,
habe eine ganz leichte Aufgabe für euch. Und zwar möchte ich, dass der Tabellenname sich mittels meines Makros nicht nur aus I2 sondern auch aus M2 Zusammensetzt.
Also steht in I2 bspw. "Juli09" und in M2 "_K" hätte ich gerne als Tabellennamen "Juli09_K"
Sheets("Kraft (...
22.09.2009 18:10:20
Thread-ID: 1104716
3 Beiträge
Anzeige
Tabellenblattnahme aus zwei Zellen zusammensetzen
Peter

Hallo Experten,
lässt sich ein Tabellenblattnahme aus zwei bestimmten Zellen automatisch zusammensetzen?
Gruß Peter
20.07.2010 08:32:22
Thread-ID: 1167824
4 Beiträge
Wie füllt man mehrere Zellen gleichzeitig aus?
Thomas

Hallo Forum,
ich möchte gerne einen Stundenzettel entwerfen, wo bestimmte Informationen durch ein Dropdown-Menü ausgewählt werden sollen.
In meiner Datei findet ihr 2 Lösungsansätze.
In der Tabelle1 habe ich über Steuerelemente in Spalte E die Möglichkeit die nachfolgenden Spalten F...
19.12.2010 14:13:23
Thread-ID: 1192080
5 Beiträge
vergleich von duplikaten in zwei spalten
Uli


Hallo zusammen,um es kurz zu machen:Aus einer Exceltabelle muss ich Datensätze herausfinden, die doppelt oder gar mehrfach vorkommen in Abhängigkeit von Werten in einer anderen Spalte der Tabelle.Bsp:Buchungsnummer Betrag ...
1234567 10,00
987236 10,00We...
17.05.2002 21:31:40
Thread-ID: 121816
2 Beiträge
Aus zwei Zellen String (mit Datum) zusammensetzen
Peter

Guten Tag
Ich habe ein Format-Problem.
Ausgangslage:
Benannte Zelle dDat mit Inhalt 16.08.2010 (als serielle Zahl)
Benannte Zelle dNum mit Inhalt 995047 (als Zahl)
Gewünschter String:
16.08.10-995047
Formel: =TEXT(dDat;"TT.MM.JJ")&"-" ergibt: 16.06.10-
w...
17.06.2011 11:52:22
Thread-ID: 1218685
3 Beiträge
Ergebnis aus zwei Zellen komprimieren
Claudia

Hallo zusammen,
ich habe noch eine Frage.
Ich muss das Ergebnis aus zwei Zellen komprimieren - per Formel
Zelle C11 Zahl
Zelle A10 Zahl
Wenn C11 = 0 und A10 größer 0 dann soll in C8 der Hinweis "prüfen" rein.
Wenn C11 größer 0, dann soll in C8 Hinweis "Fehler"...
16.12.2011 18:09:38
Thread-ID: 1242510
7 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
3
8
6
2
7
3
4
1
2
6
5
2
1
3
6
1
11
2
1
6
3
2
3
9
9