Nevím jestli je to jen náhoda, ale inspirovat se můžete např zde: http://www.jaknaoffice.cz/2-forum/?id=5300
Teda chlape, ty ses do toho pustil. Ten Tvůj kód (první) vychází nejlépe. Ten zbytek se tak nějak mezi sebou mele, i když by se M$ za tem Timer ve VBA měl stydět. Pokud spustím test ještě jednou výsledky se absolutně změní a u některých procedur vrací 0,0000 ms.
Hlavní je, že myslet znamená h.... vědět. A to co sem si původně naivně myslel, že bude rychlejší, tak není.
Díky za čas, který si tomu věnoval.
Jo a s tím editem máš naprostou pravdu, v jednoduchosti je síla. 
Tak trochu zneužiji toto vlákno.
Měl sem vymyšlené řešení pomocí pole, než sem však stačil zareagovat (byl sem v práci na mobilu) elnino poskytl řešení.
Nedalo mi to a dneska sem vyplodil dva kódy, a tady je vlastně můj dotaz. Primárně se týká druhého kódu (Vymaz_Err_3). Vidíte v něm nějakou zásadní slabinu nebo chybu proč takhle né?
Má domněnka je, že by měl být v případě většího počtu dat rychlejší - počet průchodů cyklu bude roven počtu (chyb) výskytu hodnoty err.
Autor dotazu může případně otestovat na větším počtu položek.
PS: Pokud by někdo věděl jak do uvedeného kódu dostat převod řetězce na malá písmena (při porovnání) stejně jako je tomu v Vymaz_Err_2 budu jen rád.
Díky
Sorry, že se do toho montuju. Jen tak ze zvědavosti, proč se zdrojový soubor nesmí otevřít?
Pokud ho otevřu na pozadí (GetObject) tak uživatel o tom nemá ani páru.
Sice už elninoslov poskytl řešení, ale když už sem se s tím drbal (2x!
, když sem to dokončil tak mi kleklo PC a soubor se neuložil), tak přidávám i to své.
Přikládám makro o kterém mluvil elninoslov (odstavec d).
Stačí doplnit fci IFERROR. Na list "Evidence" doplněna fce KDYŽ.
Teď mě tak napadá pokud potřebuješ mít data v notepadu a využiješ změnu kódu od elninoslov
stačí koncovku ".csv" nahradit ".txt" a máš vystaráno 
Vyzkoušej, žádné uvozovky v notepadu mi to nedělá
https://proexcel.cz/pole-se-seznamem-cili-combobox/
konkrétně:
Style … pokud uživatel nemá mít možnost zapsat do textového pole prvku vlastní hodnotu a bude pouze vybírat z existujících položek, zvolte 2-fmSTyleDropDownList
Přijdeš tím však o možnost zadat popisek "Vyberte ze seznamu".
V proceduře "'zápis dat z formuláře" bude třeba změnit
ComboBox2.Text = ""
na
ComboBox2.Value = ""
Ale to Tě editor upozorní.
toto:
user_name = Environ("USERNAME")
nahraď tímto:
user_name = LCase(Environ("USERNAME"))
a všechna jména uživatelů v kódu napiš malými písmeny.
jop, máš pravdu, ale v tom případě sem kratší 
Nebo maticově. Zadání vzorce se ukončí trojkombinací CTRL+SHIFT+ENTER
Co udělá tohle?
=HODNOTA.NA.TEXT(DNES()+10;"RRRRMMDD")
Tak nepoužívej formát datum.
Oblíbený formulář Faktura byl vylepšen a rozšířen.

Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.