< návrat zpět

MS Excel

Téma: Nechce mi najít číslo (.Find) rss

Zaslal/a Jiří497 31.10.2020 14:30

Narazail jsem na problém s vyhledáváním.
Vytvořil jsem si telefonní seznam. Telefonní číslo jsem naformátoval na: ### ### ###
Teď si napíši nové číslo a chci ověřit jestli jej už nemám, ale vyhledávání mi nefunguje. Má někdo zkušenost?

Set c = Worksheets("List1").Cells.Find(Range("A2").Value2, LookIn:=xlValues)

Příloha: xlsx48681_telefonni-seznam.xlsx (9kB, staženo 19x)
Zaslat odpověď >
Lugr(31.10.2020 14:38)#048684
Lugr
Jiříku neměl by jsi to jednodušší pouze podmíněné formátování a duplicity?citovat
Jiří497(31.10.2020 14:50)#048685
avatar
To neměl.

Ve skutečnosti si na řádku 7 (A:I) zadávám jméno, číslo, organizaci atd.
Všechny tyto údaje pak makrem přenesu do Tabulky, jako nový záznam. Před vložením záznamu do tabulky chci ověřit, jestli tam telefonní číslo již není. A tady jsem se zasek.

A nefunguje mi ani CTRL+F. Jedině, když zadám číslo 123 456 789. A přitom v buňce je číslo 123456789.citovat
Lugr(31.10.2020 14:53)#048686
Lugr
Tak to bude muset někdo chytřejší. Víš jak já to mám s makrem. 8citovat
Jiří497(31.10.2020 15:33)#048687
avatar
Jasně, co si člověk neudělá sám....

Už jsem na to přišel. Vyměnil jsem xlValues (Hodnoty) za xlFormulas (vzorce) a už to funguje.

Set c = Worksheets("List1").Cells.Find(Range("A2").Value2, LookIn:=xlFormulas)citovat
Lugr(31.10.2020 16:03)#048688
Lugr
Však tobě bych poradil rád, ale jak můžu radit, když ty jsi o mnoho levelů výš. 1citovat
Jiří497(31.10.2020 16:53)#048692
avatar
Vždyť to taky nebylo na tebe. 1

P.S. Až to dodělám ,tak to sem hodím, kdyby to chtěl někdo třeba použít.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje