A nebo by byla možná druhá varianta, provést součet řádků ve VBA a pak jen do buňky L2 dosadit výsledek.
Kód: Vybrat vše
Range("L2").Select
ActiveCell.FormulaR1C1 = "=SUM(R[2]C:R[65000]C)"
Samozřejmě bych uměl do cyklu FOR NEXT vzít buňku po buňce s posčítat. Jenže to pak při větších objemech dosti zpomaluje program. Chtěl bych nějaké elegantnější řešení.