< návrat zpět

MS Excel


Téma: "SVYHLEDAT" ve VBA rss

Zaslal/a 7.1.2019 10:10

Dobrý den
potřebuji poradit jak vyřešit následující:
V textovém "pseudo xml" souboru hledám položku <stat> + </stat>.

např.
<dat1>4.12.2015</dat1>
<dat2>412</dat2>
<stat>566, 663, 344</stat>
<dat3>koleda</dat3>
<dat5>velikonoce, vanoce, silvestr</dat5>

položky se zapisují do tabulky (kousek kodu)

strData = načtený soubor

....
strDat1 = Split(Split(strData, "<dat1>") (1), "</dat1>") (0)
.Range("A" & Rows.Count).End(xlUp).Offset(0,1) = strDat1
....


Problém je, že potřebuji do tabulky zapsat zkratky států nikoliv čísla.
Převodní tabulka (testovací) je přiložena (list2).
Jak to elegantně provést? Dala by se použit vlastní fce s využitím Case Select,
ale 250 převodů se mi opravdu nechce vypisovat a to ještě nemusí být konečné číslo.
Díky za pomoc.

Příloha: xlsx42322_stat.xlsx (19kB, staženo 30x)
Zaslat odpověď >

Strana:  « předchozí  1 2
#042345
elninoslov
Pr.
Příloha: zip42345_parse-hodnt-z-txt-suborov.zip (33kB, staženo 30x)
citovat
#042360
avatar

elninoslov napsal/a:

Pr.Příloha: 42345_parse-hodnt-z-txt-suborov.zip (33kB, staženo 4x)

Diky elninoslov 1
Vyšší dívčí, jdu studovat kod...citovat

Strana:  « předchozí  1 2

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Která Ip otevřela sešit

Barth • 23.9. 12:27

Která Ip otevřela sešit

Barth • 23.9. 10:15

Která Ip otevřela sešit

Barth • 23.9. 9:48

Která Ip otevřela sešit

Scraper • 22.9. 12:47

Vyhledat s vícenásobných porovnáním

maxovo • 22.9. 11:29

spustit makro změnou hodnoty v buňce a svyhledat

Stalker • 21.9. 20:36

spustit makro změnou hodnoty v buňce a svyhledat

elninoslov • 21.9. 19:01