Hallo liebe Forumsgemeinde,
Hab mich eben hier angemeldet, weil ich nimmer weiter weis
Bin Student und muss für die Uni etwas programmieren und zwar in word mittels vba, bin echt schon am verzweifeln aber ich hoffe ihr helft mir weiter
Hier die Aufgabenstellung:
Monatsumsätze eines Produktes analysieren und größten Wert, inkl. Angabe der relevanten Monatsnummer ausgeben.
hier mein quellcode:
Sub Bso1004()
'Deklaration
Const T1 = "Bitte geben Sie die Monatsumsätze ein: "
Const T2 = "Der Monatsumsatz im Monat ("
Const T3 = ") war: "
Const Startwert = 1
Const OG = 12
Const Ug = 1
Dim i As Integer
Dim Monatsumsätze(12) As Variant
Dim ausgabe As Variant
'Anweisung
For i = 1 To 12
Monatsumsätze(i) = InputBox(T1)
Next
For Each ausgabe In Monatsumsätze
MsgBox (T2 & i & T3 & ausgabe)
Next
MsgBox (UBound(ausgabe))
End Sub
Ich weis, dass ich ubound einbauen muss, aber wie, damit mir das ding, das auch ausgibt?
--------------------------------------------------------------------------
Zweites Beispiel:
Monatsumsätze eines Produktes analysieren und Durchschnittswert ausgeben.
Hier ist der anfang gleich, aber ich hab keinen Schimmer, wie ich einen Durchschnittswert ausgebe? Gibt es da eine Anweisung oder eine Funktion??
----------------------------------------------------------------------
Letztes Beispiel:
Testen der Qualität unseres virtuellen Würfels.
6 Millionen Würfelvorgänge durchführen und Auskunft geben wie oft jede Augenzahl gewürfelt wurde.
Hier muss ich ehrlich sagen hab ich keinen Plan =(
Bitte Leute helft einem armen Studenten auf die Sprünge
|