Durchschnittswerte in VBA berechnen

November 3

VBA (Visual Basic für Applikationen) enthält Anweisungen erstellen ein Makro, das nachahmen wird mit einem Taschenrechner mit einer Reihe von Zahlen eingeben und berechnen Sie den Mittelwert zu programmieren. Der Code ist nur 13 Zeilen lang. Es könnte in einigen Microsoft Office-Programmen ohne einen integrierten Taschenrechner nützlich sein. Da Excel eine Mittelwert-Funktion enthält, gäbe es keinen Grund, dieses Makro in Excel zu verwenden. Wie in diesem Beispiel, wo das Makro in Microsoft Word erstellt wurde, kann es jedoch einige Sinn machen.

Anweisungen

1 Öffnen Sie ein Microsoft Office-Programm, unterstützt von VBA (Visual Basic für Applikationen). In diesem Beispiel verwenden Sie Microsoft Word.

2 Klicken Sie auf "Entwickler" gefolgt von "Visual Basic", die aufgeführt ist am linken Rand ein Menü, das angezeigt, in der Entwickler-Gruppe wird. Das VBA-Editor-Fenster wird geöffnet.

3 Geben Sie die folgenden Codezeilen, genau wie unten dargestellt:

Sub AverageMyNumbers()Dim StrData als ZeichenfolgeI, SglNbr, SglSubT, SglAverage As Single DimIch = 0Bis StrData tun = "X"StrData = InputBox ("geben Sie die Nummern zu gemittelt werden, jeweils einzeln, drücken 'Enter', um zur nächsten weiter. Geben Sie einem Kapital X wenn fertig.")SglNbr = Val(strData)SglSubT = SglNbr + SglSubTi = i + 1LoopSglAverage = SglSubT / (i - 1)MsgBox ("der Durchschnitt dieser Zahlen ist" & SglAverage)EndSub

4 Testen Sie die Richtigkeit des Programms, indem Sie eine Reihe von Zahlen auf dem Papier, Höhe von ihnen und dividiert durch die Anzahl der einzelnen Elemente. Drücken Sie "F5" führen Sie das Makro und berechnen im Durchschnitt. Folgen Sie den Anweisungen und geben Sie die gleiche Reihe von Zahlen, endet mit einem großen X. Wenn die Ergebnisse nicht übereinstimmen, überprüfen Sie die Richtigkeit des Codes, die Sie eingegeben haben, vergleichen es mit Schritt 3.

5 Klicken Sie auf "Makros" im Word-Dokument. Speichern Sie das Makro in der Dokumentvorlage "normal.dotm", wenn Sie es in allen Word-Dokumenten verwenden möchten. Andere Optionen gibt es wie nur für die Verwendung im aktiven Dokument speichern, als Teil einer bestimmten Vorlage speichern oder speichern in allen aktiven Dokumentvorlagen und Dokumenten.

Tipps & Warnungen

  • Sie müssen das Dokument als ein Dokument mit aktivierten Makros speichern, um das Makro zu verwenden.
  • Vorsicht bei jedem Programm, das Loop-Funktionen enthält. Wenn der Benutzer nicht nichts eingeben, wird wird dieses Programm für weitere Zahlen Aufforderung zu halten bis ein Kapital X eingegeben wird. Es wird als ein weiterer Zähler in die Gesamtzahl der Einträge, die aus dem Durchschnitt jeder leeren Eintrag gezählt. Es ist sogar möglich, in einer Endlos-Schleife zu erhalten, wenn die falsche Art von Daten eingegeben werden. Im wirklichen Leben würde-Fehlerbehebung Code hinzugefügt werden, warnt den Benutzer, dass sie einen Fehler gemacht und des Fehlers wiederherstellen.