< návrat zpět

MS Excel


Téma: formát data ve formuláři rss

Zaslal/a 23.5.2013 10:29

Ahoj, snažím se nastavit formát data textového pole ve formuláři a zkouším standardní:

datum.Value = Format(datum.Value, "dd.mm.yyyy")

Ale při otevření formuláře se vždy datum přehodí na mm.dd.yyyy, nevíte, kde je chyba, respektive, jak to striktně nastavit? Díky

Zaslat odpověď >

icon #013418
Poki
TextBox (na UserFormu) muze obsahovat vzdy jen text (samozrejme tam muze byt datum, ale je chapano jako text) - nelze tedy nastavit textbox tak, aby zobrazoval datum - musite mu vzdy priradit obsah tak, aby uz dostal zformatovany vstup

Chcete-li tedy v textovem poli zobrazit dnesni datum, zkuste nasledujici (za predpokladu, ze textove pole je pojmenovano TextBox1)

TextBox1.Text = Format(Date, "dd.mm.yyyy")citovat
#013419
avatar
Potřeboval bych tam právě zobrazit datum, které je v jedné buňce, ale ve stejném tvaru, jakém je v buňce (dd.mm.yyyy), ale když dám TextBox1.Text = Format(TextBox1, "dd.mm.yyyy") zobrazuje se někdy ve formátu mm.dd.yyyy. Je to zajímavé, že mi to přehazuje dny a měsíce jen u nějakých datumů, třeba u 10.6.2013 se mi zobrazuje 6.10.2013, 27.10.2013 se mi zobrazuje normálně,prostě dny pod 12 to považuje za měsíce a přehodí to, nevím proč...citovat
icon #013420
eLCHa
Já nerozumím tomu, že na jedné straně píšete
TextBox1.Text = Format(TextBox1, "dd.mm.yyyy")
takže berete tu hodnotu z textboxu
a na druhé
ale ve stejném tvaru, jakém je v buňce (dd.mm.yyyy)
ale chcete ji brát z buňky

Nicméně mi to ukazuje na to, že převádíte textovou hodnotu na datum a potom mě nepřekvapuje, že se vám to zaměňuje, protože program je americký a oni jsou datum prostě zvyklí zobrazovat jinak než my.
takže pokud je ve zdroji řetězec "10.6.2013" zkusí ho program převést "po americku" a když je hodnota platná, pracuje s ní (tedy "6.10.2013"). Pokud není platná, zkusí to "po našem", proto "27.10.2013" zůstane "27.10.2013".

Pokud máte hodnotu v buňce textovou, může se to stát. Pokud tam máte datum (tedy číslo), tak ne.citovat
#013421
avatar
Ježiš, jsem to ale....pardon, změnil jsem to na datum = Format(ActiveSheet.Cells(Radek, 15), "dd.mm.yyyy") Omlouvám se, teprve s tím začínám :)citovat
icon #013422
eLCHa
Takže vyřešeno?
Jinak bych doporučil, pokud vám něco dělá něco jinak než by to něco mělo dělat ;), vložit sem přílohu (je třeba se zaregistrovat). Dostanete odpověď rychleji a hlavně přesněji, protože budeme vědět, co se vám nedaří.citovat

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