Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

XP SP2; Excel 2002; VBA; Multiplizieren der Inhalte zweier Zellen





Frage

... und Speichern des Produktes in einer dritteZelle. Guten Tag, liebe SN-ler, die Inhalte zweier Zellen, z.B. D10 und E5 sollen miteinander multipliziert werden. Das Ergebnis soll in der Zelle F12 gespeichert werden. Angenommen D10 gleich 5 und E5 gleich 13, dann muss in Zelle F12 = 65 stehen. Auf dem Tabellenblatt geht es ganz einfach: man schreibt in Zelle F12: =D10*E5. In meinem Fall aber nehmen E5 und D10 ihre Werte erst nach Einlesen eines Messwertesatzes aus einem externen Speicher an. Die Auswertung mache ich deshalb über VBA. Auf diese Weise geht es, wenn auch etwas umständlich, meine ich: Sub multipl() ´Zelle D10: Range("F12").Select ActiveCell.Offset(-2, -2).Select b = ActiveCell.Address g = Range(b).Value ´Zelle E5: Range("F12").Select ActiveCell.Offset(-7, -1).Select c = ActiveCell.Address h = Range(c).Value ´Produkt Range("F12").Value = g * h End Sub Hat jemand einen Tip, wie die Multiplikation einfacher programmieren kann? Die Offset-Befehle verwende ich, weil solche Multiplikationen bei meinen Auswertungen häufig in Zahlenreihen mit benachbarten Zellen auftreten. Ich kann sie dann durch Schleifenbildung abarbeiten lassen. Gruß und alles Gute für das Neue Jahr Queelun

Antwort 1 von Risatara2

Ich weiß jetzt nicht, aber geht nicht der simple konstrukt:

Range("F12").Value=Range("D10").value*Range("E5").value


Werde den aber erstmal ausprobieren... Doch, bei mir geht das.
Risatara