< návrat zpět

MS Excel

Téma: Spuštění - textová hodnota rss

Zaslal/a bobika99 28.1.2024 12:24

Dobrý den,
potřeboval bych pomoci s tímto problémem. Čím mám nahradit proměnnou "dotaz" v podmínce If aby to fungovalo ?. Díky moc.


dotaz = "5 + 5 = 10"
If dotaz Then
MsgBox "A"
End If

Zaslat odpověď >
Začátečník(28.1.2024 12:55)citovat#056075
Začátečník
A co se má vyhodnotit jako správná podmínka?
Podmínka se vyhodnocuje jako logická hodnota, tedy pokud DOTAZ je definován jako "5 + 5 = 10" (to je textová hodnota) musí se s něčím porovnat.
If dotaz = "5 + 5 = 10" then
' správně
Else
' špatně
End If
bobika99(28.1.2024 13:32)citovat#056076
avatar
Vyhodnotit se má právě ten text co je uložený v proměnný "dotaz". Napsal jsem to jako příklad, ve skutečnosti tam je poskládaná podmínka např.:


dotaz = "(.Cells(5, 2).Value Like "020319??00" Or .Cells(5, 2).Value Like "0203??0000" Or .Cells(5, 2).Value Like "02??000000")"
If dotaz Then
...
Začátečník(28.1.2024 13:43)citovat#056077
Začátečník
Jak jsem již uvedl, podmínka musí být logická

dotaz="5 + 5 = 10"
If dotaz = "5 + 5 = 10" then
' správně
Else
' špatně
End If
Jinak už nevím jak to srozumitelněji napsat.

bobika99 napsal/a:

...ve skutečnosti tam je poskládaná podmínka...
ale proměnná dotaz je textová, podle přikladu.
bobika99(28.1.2024 13:54)citovat#056078
avatar
Já ale potřebuji ve skutečnosti vyhodnotit tohle:


If (.Cells(5, 2).Value Like "020319??00" Or .Cells(5, 2).Value Like "0203??0000" Or .Cells(5, 2).Value Like "02??000000") Then
...
Začátečník(28.1.2024 14:01)citovat#056079
Začátečník
A čemu se má uvedený výraz rovnat?

Pokud výraz bude logickou hodnotou, pak bude podmínkou vyhodnocen.

Podle popisu výše to určitě nebude logická hodnota.

Doporučuji deklarovat proměnné a určit jejich datové typy.

bobika99 napsal/a:

dotaz = "(.Cells(5, 2).Value Like "020319??00" Or .Cells(5, 2).Value Like "0203??0000" Or .Cells(5, 2).Value Like "02??000000")"
Proměnná dotaz není logickou hodnotou.

dotaz = .Cells(5, 2).Value Like "020319??00" Or .Cells(5, 2).Value Like "0203??0000" Or .Cells(5, 2).Value Like "02??000000"
Stalker(28.1.2024 14:29)citovat#056080
Stalker
https://learn.microsoft.com/cs-cz/dotnet/visual-basic/language-reference/operators/like-operator

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