Variablen Rechnung

09/07/2008 - 08:53 von morpheus2906 | Report spam
Hallo.

Ich habe folgendes Frage.

Ich würde gerne wissen, was ich machen muss damit das "Ergebniss"
einer Rechnung von Variablen auf einer neuen Tabelle im A1 angezeigt
wird. Hier ist mal der code. Wàre nett, wenn ihr mir sagen könnt was
ich machen muss. (Kenne mich nicht so gut aus, also am liebsten
ausführlich.) Dankeschön

code:

Public Function Variabel(ByVal vWert As Double, ByVal vWert2 As
Double) As Double
Dim Result As Double

'MsgBox ("vWert: " & vWert)
'MsgBox ("vWert2:" & vWert2)

Result = vWert + vWert2

vWert = vWert * 5
vWert2 = vWert2 * 5


'MsgBox ("vWert: " & vWert)
'MsgBox ("vWert2: " & vWert2)

Variabel = Result
End Function

Public Function getFkt1() As Double
Dim v1 As Double
Dim v2 As Double

v1 = 3
v2 = 4

getFkt1 = Variabel(v1, v2) + 13



' MsgBox ("v1: " & v1)
' MsgBox ("v2: " & v2)



End Function






lg, Julian.
 

Lesen sie die antworten

#1 Melanie Breden
09/07/2008 - 10:10 | Warnen spam
Hallo Julian,

schrieb :

Ich würde gerne wissen, was ich machen muss damit das "Ergebniss"
einer Rechnung von Variablen auf einer neuen Tabelle im A1 angezeigt
wird. Hier ist mal der code. Wàre nett, wenn ihr mir sagen könnt was
ich machen muss.



Du kannst das Ergebnis einer Funktion direkt an eine Zelle übergeben, z.B:

Worksheets("Tabelle1").Range("A1").Value= Variabel(5.55, 6.95)


Mit freundlichen Grüssen
Melanie Breden

- Microsoft MVP für Excel -
www.melanie-breden.de
Das Excel-VBA Codebook 2007 http://tinyurl.com/2nwvod

Ähnliche fragen