|
Mahlzeit zusammen,
ich habe eine absolute Anfängerfrage zum Thema VBA und Excel.
Mir liegt folgende Tabelle im Excel-Dokument vor:
(A) (B)
(1) Jahreszahl Variable
(2) 500 a
(3) 750 b
(4) 2000 c
(5) 300 d
(6) 3000 e
Meine Aufgabe ist es nun am Ende per MsgBox auszugeben, welche Jahreszahl und dazugehörige Variable 1.) dem Jahr 2018 am nähesten kommt, 2.) am entferntesten zum Jahr 2018 liegt und 3.) die Anzahl der eingegeben Daten zu zählen, sowie die durchschnittliche Differenz zum Jahr 2018.
Das Programm habe ich soweit geschrieben, mein Problem besteht jetzt allerdings darin den Bezug zur Tablle herzustellen. Wie bringe ich VBA dazu in der Schleife die Tabelle zu durchlaufen und zu verstehen, dass Variable und Jahreszahl sozusagen zusammengehören?
Vielen lieben Dank bereits im Voraus für die Mithilfe!!!
PS: Die Schleife sieht folgt aus, sollte sich dort ein Fehler befinden, bitte anmerken :)
While Differenz > 0
Differenz = 2018 - Jahreszahl
(Rem Minimale Differenz)
If Differenz < Min Then
Min = Differenz
Minvariable = Variable
End If
(Rem Maximales Alter)
If Differenz > Max Then
Max = Differenz
Maxvariable = Variable
End If
(für die Durchschnittsberechnung dann noch):
Sum = Sum + Differenz
Anzahl = Anzahl + 1
Wend
|