If you really need formulas and not just values, here is one option
Names Default To Here(1);
dt = New Table("test",
Add Rows(2),
New Column("ColumnA", Numeric, Continuous, Values([1, 2])),
Invisible // open/create as invisible! (or make invisible)
);
For(i = 1, i <= 1000, i++,
Eval(EvalExpr(
dt << New Column("ColumnA+"||Char(i), Numeric, Continuous, Formula(
:ColumnA + Expr(i)
))
));
);
dt << Show Window(1); // if you need table visible later
If speed is important using Invisible is one thing you can do.
-Jarmo