VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Sabrina	Datum: 14.07.2016 11:17:26	Views: 755	Rating:	Antwort:
Thema: Vlookup
Was ich vllt noch erwähnen sollte, Wert1 bis Wert5 sind variabel, meine FUnktion sieht wie folgt aus: Public Function Test( _ dbl_F1 As Double, _ dbl_F2 As Double, _ dbl_F3 As Double, _ dbl_F4 As Double, _ dbl_F5 As Double, _ dbl_F6 As Double, _ dbl_F7 As Double) As Double ' Bilde 1 Value Dim NRFV_F1 As Double Dim NRFV_F2 As Double Dim NRFV_F3 As Double Dim NRFV_F4 As Double Dim NRFV_F5 As Double Dim NRFV_F6 As Double Dim NRFV_F7 As Double NRFV_F1 = (dbl_F1 - (-38.03)) / (81.26 - (-38.03)) NRFV_F2 = (dbl_F2 - 0) / (49.02 - 0) NRFV_F3 = (dbl_F3 - 1.45) / (831.59 - 1.45) NRFV_F4 = (dbl_F4 - 0.02) / (181.84 - 0.02) NRFV_F5 = NRFV_F6 = (dbl_F6 - 23320) / (28762 - 23320) NRFV_F7 = (dbl_F7 - 90) / (2202423 - 90)

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen