< návrat zpět

MS Excel

Téma: UserForm Měna rss

Zaslal/a Niffki 2.8.2010 13:55

Zdravím,

mám tabulku a v něm nastavený userform, který mi zapisuje údaje do dané tabulky. Jenže u čísla se mi zobrazuje chyba - číslo je uložené jako text a mám buňku převést na číslo. Nevíte kde mám chybu? .. Podmínku mám nastavenou - As Interger. Potřeboval bych aby se mi tam ukazovala měna ( Kč )

Díki

Zaslat odpověď >
Strana:  1 2   další »
Jeza.m(2.8.2010 16:39)#002058
Jeza.m
Zkoušel jsem třeba:
Dim a As Integer
a = 5
ActiveCell = a
ActiveCell.NumberFormat = "#,##0.00 Kč"

M@citovat
Začátečník(3.8.2010 10:16)#002060
Začátečník
Zkus použít:
Cells(start, 7) = Format(JedCpred_f, "#,##0.00 Kč")

Loncitovat
Niffki(3.8.2010 10:30)#002061
avatar
funguje to ale pořád mi to oznamuje chybu že číslo je uložené jako textcitovat
Začátečník(3.8.2010 10:47)#002062
Začátečník
Pak:
Cells(start, 7) = Val(JedCpred_f)
Cells(start, 7).NumberFormat = "#,##0.00 Kč"

I přesto, že DIM JedCpred As Integer

Loncitovat
Niffki(3.8.2010 11:06)#002063
avatar
JO JO, UŽ FUNGUJE, DÍKI MOC ;-)

MŮŽU JEŠTE DOTAZ?
1) JAK DOCÍLIT ABY SE MI OKOPÍROVALO OHRANIČENÍ BUNĚK? --- VLOŽÍM NOVÝ ÚDAJ ALE VLOŽÍ SE TO TAM BEZ OHRANIČENÍ.

2) DO SLOUPCE "CELKOVÁ CENA PŘEDPOKLAD KČ(8.)" BYCH CHTĚL VLOŽIT POMOCÍ MAKRA VZOREC KTERÝ BY MI NÁSOBIL ČÍSLO VE SLOUPCI MNOŽSTVÍ A ČÍSLO (KČ) VE SLOUPCI JEDNOTKOVÁ CENA. TAK ŽE ČÍSLO DO SLOUPCE MNOŽSTVÍ SE BUDE VYPISOVAT RUČNĚ.

4citovat
Začátečník(3.8.2010 11:33)#002064
Začátečník
Na rychlo:

Cells(start, 7) = Val(JedCpred_f)
Cells(start, 8) = "=RC[-2]*RC[-1]" ' vzorec
Cells(start, 7).NumberFormat = "#,##0.00 Kč"
Cells(start, 8).NumberFormat = "#,##0.00 Kč"

Range(Cells(start, 3), Cells(start, 8)).Borders(xlEdgeLeft).LineStyle = xlContinuous
Range(Cells(start, 3), Cells(start, 8)).Borders(xlEdgeTop).LineStyle = xlContinuous
Range(Cells(start, 3), Cells(start, 8)).Borders(xlEdgeBottom).LineStyle = xlContinuous
Range(Cells(start, 3), Cells(start, 8)).Borders(xlEdgeRight).LineStyle = xlContinuous
Range(Cells(start, 3), Cells(start, 8)).Borders(xlInsideVertical).LineStyle = xlContinuous


Loncitovat
Niffki(3.8.2010 18:54)#002065
avatar
Díki, funguje.

Prosím tě k čemu složí kód

Val(JedCpred_f) ?citovat
Začátečník(3.8.2010 19:09)#002066
Začátečník
Zkus nápovědu v excelu.

Kdo Ti dělal ten formulář?citovat
Niffki(3.8.2010 19:31)#002067
avatar
Dělal jsem si ho sám. Pročpak?citovat
Začátečník(3.8.2010 22:24)#002070
Začátečník
Pro nic, jen pro upřesnění.
Tak jak jsi na tom s funkcí VAL()?

Loncitovat

Strana:  1 2   další »

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