einfach VBA Programmierung

  • Hallo alle miteinander!
    Momentan beschäftige ich mich aufgrund meines Studiums mit VBA.
    (bin also Anfänger, deswegen bitte nicht über meine Frage lachen ;) )

    Folgendes Programm habe ich geschrieben:
    Sub zähler()
    Dim zähler As Integer, anzahl6 As Integer, summe As Long, zahl As Integer

    zähler = 0
    anzahl6 = 0
    summe = 0

    Do While zähler < 10
    zahl = InputBox("Bitte geben Sie eine Zahl ein: ")
    summe = summe + zahl
    If zahl = 6 Then anzahl6 = anzahl6 + 1
    zähler = zähler + 1
    Loop

    MsgBox ("Die Summe der Zahlen ist:"&summe&" Die Anzahl 6en: &anzahl6").

    Bei der letzten Zeile (MsgBox) kommt immer der Hinweis "Syntaxfehler" oder "Listentrennzeichen oder )"

    Ich habe schon alles (soweit es mein Wissen zulässt) ausprobiert!
    Kann mir jemand helfen???

  • also, vorraus, ich kann kein VBA aber den Syntax hab ich bereits erkannt. sei mir also bitte wegen VBA spezifischen fehlern nich böse ;)
    Du schreibst hier

    Code
    "[...] Der Zahlen ist:"&summe&" Die Anzahl 6en: &anzahl6");

    Aus dem "&summe&" erkenne ich, & ist der Stringverbindungsoperator in VBA, wie der punkt (.) in PHP oder das plus (+) in Java(script). Demnach müsste es heissen

    Code
    MsgBox ("Die Summe der Zahlen ist:"&summe&" Die Anzahl 6en:  "&anzahl6).

    denn das würde z.B. in JavaScript so aussehen:

    PHP
    alert("Die Summe der Zahlen ist "+summe+" Die Anzahl 6en: "+anzahl6);

    Wie du auch hier erkennst, ist der verbindungsoperator + hier auch anders gesetzt. Schau dir nochmal den Syntax an, solche grundlagen eben wie den Syntax sollte man auf jeden Fall können!

    Der, der weiß dass er nichts weiß, weiß mehr als der, der nicht weiß, dass er nichts weiß.

    Wer nach etwas fragt, geht grundsätzlich das Risiko ein, es auch zu bekommen!

    3 Mal editiert, zuletzt von Tobse (21. April 2010 um 21:30)