MS Excel

Tady zase já,
nevím si rady s tím, jak spojit více proměnných do určitého formátu a zapsat jej jak do konkrétní buňky v tabulce tak ji posleat ještě do druhého formuláře.S uložením ani tak probém nemám jako spíš, že bych to potřeboval uložit v určitém formátu. Výsledný formát by byl např: 1598/024/2010-00001.

Zaslat odpověď >

husita(28.10.2010 12:22)#002912

V podstatě mi jde o to, jak docílit toho, že výstupní formát bude z proměnných a=1598 b=24 c=2010 d=1 1598/024/2010-00001. Vždycky se mi to uloží pouze 1598/24/2010-1.
použil jsem tento zápis

Dim cpop, cbyt, crok, cpor, vysledek As String
cpop = Cispop
cbyt = Cbytu
crok = Year(Now())
cpor = CISCE
vysledek = cpop & "/" & cbyt & "/" & crok & "-" & cpor

' doplnění hodnot do tabulky
pocet.Offset(0, 0).Value = CISCE.Value
pocet.Offset(0, 2).Value = ComboBox1.Value
pocet.Offset(0, 3).Value = Cispop.Value
pocet.Offset(0, 4).Value = Cbytu.Value
pocet.Offset(0, 5).Value = Najemce.Value
pocet.Offset(0, 6).Value = Strd.Value
pocet.Offset(0, 7).Value = DTPicker1.Value
pocet.Offset(0, 1).Value = vysledekcitovat

krapl(29.10.2010 8:21)#002919

Možná pomůže:
Dim cpop, cbyt, crok, cpor, vysledek As String
cpop = Cispop
cbyt = Cbytu
crok = Year(Now())
cpor = CISCE
vysledek = cpop & "/" & cbyt & "/" & crok & "-" & format(cpor,"00000")

' doplnění hodnot do tabulky
pocet.Offset(0, 0).Value = CISCE.Value
pocet.Offset(0, 2).Value = ComboBox1.Value
pocet.Offset(0, 3).Value = Cispop.Value
pocet.Offset(0, 4).Value = Cbytu.Value
pocet.Offset(0, 5).Value = Najemce.Value
pocet.Offset(0, 6).Value = Strd.Value
pocet.Offset(0, 7).Value = DTPicker1.Value
pocet.Offset(0, 1).Value = vysledekcitovat

husita(29.10.2010 10:17)#002922

bože, já su lama, mockrát děkuju, funguje to báječně!!!
ještě jednou moc děkujucitovat

husita(1.11.2010 13:26)#002946

V excelu 2007 to funguje naprosto sqěle, ovšem, když to spustíš na 2003 hodí to chybovou hlášku. Existuje nějaká jiná funkce, která by nahradila funkci Format a fungovala pod 2003?? Díky
vysledek = cpop & "/" & cbyt & "/" & crok & "-" & format(cpor,"00000")citovat

Téma: Uložení proměnných

Uživatelské menu

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Relativní cesta - zdroje Power Query

Relativní cesta - zdroje Power Query

Jak odstraním duplicitní údaje

Jak odstraním duplicitní údaje

Vyhledej

Vyhledej