Zitat von
Hobby-Programmierer:
Du hast immer noch nicht dem angehängtem Object einen Wert zugewiesen!!if integer(JVSG1.objects[col,row])=2 then
läuft ins leere. Bist Du sicher das dies der richtige Weg für dich ist? Prüfe stattdessen doch einfach den Wert der Zelle direkt if Trim(Cells[col, row]) = '2' then
Ich bin jetzt langsam davon überzeugt die gesamte DrawCell Routine ist für dieses Problem nicht geeignet. Wie schon geschrieben habe ich diese Routine aus diesem Forum. Sie selber zu schreiben, weiß ich gar nicht wie, da ich Anfänger bin.