versuchs doch mal
hiermit.
das sollte eigentlich funzen. wenn du in zellen schreiben willst, dann musst du statt
ShowMessage(ws.Cells.Item[y,x].Value);
dies Eingeben:
ws.Cells.Item[y,x].Value:= Edit1.Text;
hoffe das ist richtig so. habs nicht getestet
