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???