MS Excel

Téma: vyhledat hodnotu ve všech souborech

Zaslal/a vitekv 13.10.2017 14:06

Prosím o pomoc při tvorbě makra.
V sešitu "vybrané vyhledat" v listu "makro" je v buňce B2 textový řetězec, který potřebuji najít ve všech souborech složky, která je uvedena v buňce B4.
Tato hodnota se vyskytuje vždy ve stejném sloupci souborů a je jedinečná.
Má představa - makro prochází jednotlivé soubory (názvy listů jsou stejné) a hledá ve sloupci D zadanou hodnotu. Pokud ji najde, vytvoří nový sešit s názvem vyhledávané hodnoty, do něj vloží list se strukturou listu "šablona", který je v sešitu "vybrané vyhledat". Tam do sloupce A od řádku 3 zapisuje nejprve název sešitu, ve kterém hodnotu nalezl a poté následuje kopie celého nalezeného řádku(hodnot a formátu). V přiloženém souboru je i ukázka toho, jak to vlastně vše myslím.
Děkuji za cokoliv.
Vítek

Příloha: zip

37940_pokus.zip (50kB, staženo 27x)

Zaslat odpověď >

elninoslov(13.10.2017 16:42)#037944

Príklad...
Tie Vaše makrá som Vám tam nechal, len som pridal makro Najdi.

Příloha: zip

37944_vyhladavanie-v-suboroch.zip (59kB, staženo 54x)

citovat

vitekv(13.10.2017 20:28)#037947

Děkuji, snad se z toho něco dalšího naučím, funguje to přesně tak, jak jsem si představoval.citovat

vitekv(14.10.2017 13:19)#037952

Jak by šlo makro upravit, aby kdyby byla hledaná hodnota v prohledávaném souboru více než jednou, se překopíroval každý řádek s nalezenou hodnotou?
Děkujicitovat

elninoslov(17.10.2017 6:32)#037981

A koľko tých riadkov tam bude asi väčšinou zaplnených, a koľko z nich asi bude vyhovovať? Ide o to, že či bude rýchlejší filter, porovnávanie poľa, či Find ...citovat

vitekv(17.10.2017 6:44)#037982

v případě více stejných hodnot se bude v jednom sešitu vyskytovat cca 5-30 stejných z celkových tak 1000 - 2000 řádků.citovat

Uživatelské menu

Nejste přihlášen(a)

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.