< návrat zpět

MS Excel


Téma: chyba v běhu makra rss

Zaslal/a 9.2.2013 5:12

lajosZdravím,přátelé,
Mám následující problém.Pokud mám v Comboboxu v UserFormu číslo s desetinnou čárkou,makro ze zastaví s chybou Run Time Error 13-mismath.Problém bude zřejmě někde v oblasti Místního nastavení a nastavení v Excelu.Dokonce se mi jednou povedlo,že makro proběhlo,ale po zavření sešitu a opětovném otevření se problém objevil zase.Má s tím někdo zkušenosti?Mám verziMS Office 2007Cz a WIN7ProfesionalCZ,oboje originál legální.Dík za případnou pomoc.

stop Uzamčeno - nelze přidávat nové příspěvky.

#011551
avatar
Chyba bude určitě v kódu. To "mismath" znamená, že dojde k matematické chybě, například "přetečení" u proměnné, nesprávně definovaná proměnná, nematematický výraz apod.
A jako vždy :-), přidej soubor...
P.citovat
#011555
Jeza.m
Těžko říct jak kód vypadá, ale lepší než pracovat přímo s Combem je nejprve si hodnotu načíst do proměnné konkrétního typu, má-li být číslo, tak třeba single a pak dál v kódu pracovat s touto proměnnou. Dále pokud to místní nastavení OS vyžaduje, tak převést čárku na tečku replace(x,",",".").

M@citovat
#011557
lajos
Zdravím a dík za odezvu.Částečně se podařilo s tím něco udělat.Pokud ve WIN7 v místním nastavení změním oddělovač na "tečku",tak to funguje.Jenže pak nemůžu psát desetinnou čárku.Takže celkem v podstatě nanic.
K příloze:pokud v UF v Comboboxech C5 a C6 vyberu částku s desetinnou čárkou,nastane ta chyba.Comboboxy se plní z listu "Ceník".
Příloha: rar11557_priprava.rar (64kB, staženo 25x)
citovat
#011558
Jeza.m
Přiznám se že nevím co znamená to CDb1 :-), ale zkus tam dosadit něco jako:
Else: hodnota1 = Replace(UserForm2.C5.Value, ".", ",")
M@citovat
#011559
Opičák
máš tam výpočty, pro mě nejasné, ale jen jsem do toho mrknul
hodnota1 = CDbl(UserForm2.C6.Value)

oprav na:

hodnota1 = Val(UserForm2.C6.Value)
a všechno počítácitovat
#011560
Opičák
Místo jakéhosi zápisu makra
"!D2:D" & wsh.Cells(Rows.Count, "D").End(xlUp).Row

použij funkci
Application.WorksheetFunction.CountA(Range("D:D"))

několikrát jsem soubor zkoušel a vždy se mi Excel "udávil" zbledl a zemřel. 7citovat
#011563
lajos
Oběma děkuji,jak Opičák,tak Jeza.M-pomohli.Ještě jednou dík.citovat

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

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09