MS Excel

Téma: Kod vba pro nalezeni textu

Zaslal/a PavDD 21.2.2024 15:24

Potřeboval bych prosím vyextrahovat z textu :
objednávky činí 921,49 CZK bez DPH (1 115,00 CZK s DPH).

zprava jen tu cenu 1 115,00 .
tzv zleva od závorky po mezeru před CZK.
Děkuji

Zaslat odpověď >

elninoslov(21.2.2024 16:18)#056210

Dim Text As String, Cena As Double

Text = "objednávky činí 921,49 CZK bez DPH (1 115,10 CZK s DPH)."
Cena = Val(Replace(Split(Split(Replace(Text, " ", ""), "(")(1), "CZK")(0), ",", "."))citovat

PavDD(21.2.2024 17:23)#056211

Díky...je to boj.

citovat

Uživatelské menu

Nejste přihlášen(a)

přihlásit
registrace

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.