< návrat zpět

MS Excel


Téma: Kod vba pro nalezeni textu rss

Zaslal/a 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ěď >

#056210
elninoslov
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
#056211
avatar
Díky...je to boj. 5citovat

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

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21