Zdravím, je tu spousty rad a něco mi pomůže, ale jsem naprostý amatér a řeším jeden problém. Potřebuji aby mi tento script dokázal nejen zapsat ty hodnoty, ale přidat je pod poslední záznam. Teď pouze zapíše a přepíše. Sub ZapisLidiDoDenniZaznam() poc = 0 For i = 2 To 1000 If Cells(i, 11).Value <> &...