Wer könnte mir bei meinem Problem helfen?
In Spalte A wird die Länge und in Splate B wird der R-Wert eingegeben, daraus wird der Druckverlust in Spalte C berechnet. Folgender Code funktioniert für die 2 Zeile.
Sub Ausgabe()
Dim a$
Dim b$
Dim c$
a = Range("a2").Value
b = Range("b2").Value
c = a * b
Range("c2").Value = c
End Sub
Wie muss die Prozedur geschrieben werden, mit Spalten-Namen (Einfügen ->Namen ->Festlegen..) für eine beliebige Zeile, wenn die Spalte A (Name="Länge"), Splate B (Name="RWert") und Spalte C (Name="dp") benennt werden.
Mit freundlichen Grüssen
Ernst Dunkel