Ich habe als mir langweilig war, mal mit VBA in Excel angefangen und mir zum Ziel gesetzt, ein TicTacToe zu programmieren.

So ganz als Anfänger habe ich es innerhalb von rund 3 Tagen dann doch geschafft, ein funktionsfähiges TicTacToe zu programmieren, bei dem man mit 2 Spielern spielt.

Doch hat es mich anschliessend gereizt, es noch ein wenig interessanter zu gestalten und das Ganze umzuprogrammieren, damit man dies gegen einen Computer-Spieler spielen kann. Die Logik des Computerspielers klappt mehr oder weniger sehr gut.

Allerdings habe ich ein Problem mit dem Worksheet_Change.

Bei jedem Worksheet_Change durchsucht er das Spielfeld, ob es ein "x" oder ein "o" ist und führt das entsprechende Makro aus.

Beim 1. "x" setzt er sauber ein "o"

Beim 2. "x" setzt er allerdings bereits 2 neue "o", anstelle von einem

und beim 3. "x" dann noch 3 weitere "o".

Wie kann ich das Problem lösen?

Hier das Excel-File:

http://www.share-online.biz/dl/R33N1LMM9A

Danke bereits im Voraus

Limas