• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Fórum

Příspěvky uživatele

Typ = IIf(Val(Application.Version) <= 11, xlNormal, xlExcel8)

nemůže být xlExcel8 - ukládá jako xls
změňte na

xlOpenXMLWorkbookMacroEnabled - (resp. 52 ) ukládá jako xlsm

Ano lze.
Datum buď číslem 15.6.2019 - 43631
nebo funkcí DATUM(2019;6;15)

pro všechny
Formátovat hodnoty pro které platí vzorec:
=A($A$1>DNES();$B$1>DNES();$C$1>DNES())

platí alespoň jedna
=NEBO($A$1>DNES();$B$1>DNES();$C$1>DNES())

(podle potřeby odstranit $ )

čísla sloupců jsou pořadová čísla sloupců v listu,
ne tabulky

ActiveWorkbook.SaveAs Filename:=jmeno, FileFormat:=52

pomocny = 4 * modu2
If Abs(4 * modu2 - pomocny) < 0.001 And pomocny >= 6 And pomocny <= 28 Then[/quote]

modu2 má mít krok 1/4.
Násobek 4 tedy celé číslo.
Pomocny je Ingeter, modu2 je Double

První část testu IF:
rozdíl je nula (nebo blízký nule, proto 0.001 může být libovolné, otázka přesnosti) v případě,
že modu2 je celé_číslo/4
:pokud ano 2. část testuje, zda pomocny (resp, modu2) je v daném intervalu
Lze nahradit přehlednějším
modu2 >= 1.5 And modu2 <= 7

Takto?

Popište, co to má dělat.
Problematiku výpočtu neznám. Zapracovávám a upravuji jen to, co je v souboru nebo popisu dáno.

modu3 asi nebude v pořádku.
Takto se vždy přiřadí hodnota 7

Základ by měl být funkční.
Nutno zkontrolovat výpočet d a modu2

předpokládal jsem, že ve vzorci
skut = (((a + b) * m) / 2) - (((c + d) * modu) / 2)
má být modu2, protože modu se nikde nenačítá

Jen několik postřehů.

Dim m As Integer 'nemůže být pokud krok je 0.5
For m = 1.5 To 6 Step 0.5

dále
i = (b / c) * (d / c)
skut = (((a + b) * m) / 2) - (((c + d) * modu) / 2)
ale v minulém souboru bylo
i = (b / a) * (d / c)
modu = (((c + d) * modu2) / 2) - (((a + b) * m) / 2)

Navrhovaná úprava cyklů 1.9.2018 nefungovala?
http://wall.cz/index.php?m=topic&id=41357#post-41392
Počítané hodnoty "d" a "modu2" zde nemohou být Integer

Problém je, že buňky nevyhodnocuje jako prázdné, ale jako nuly.

"B" & beta & ":B" & alfa

Harok 2
CTRL A (vybrat vše)
vložit jinak - Hodnoty

V případě potřeby mít uchovány vzorce - vytvořit kopii listu Harok 2

Přes pomocné sloupce a váhu jednotlivých údajů.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Formulář Faktura

Helios iNuvio

On-line nástroje