eb = ExprBag[];
Length@eb
0
AppendTo[eb, 1]; // RepeatedTiming
{0.000011, Null}
Length@eb
5655
b = ExprBag@Take[eb, UpTo[25]];
Take[b, UpTo[26]] // Length
25
b[[5]] = 5
5
Normal@b
{1, 1, 1, 1, 5, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
1, 1}