excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: datum ve VBA
MS Excel
Téma: datum ve VBA 
Zaslal/a 19.1.2016 16:29
Zdravím, potřebuji poradit, jak z datumu dostanu měsíc ale slovně např. 1.3.2016 = březen. Month mi vrátí "3".
Jsem v lehkém šoku! MonthName(3) má u mne opravdu hodnotu "březen", a ne "march", jak jsem automaticky předpokládal. Nevzpomínám si, která jiná funkce VBA vrací rovnou lokalizovanou podobu. Snad jen vlastnost FormulaLocal, ale tam si o to Local musím říct...citovat
Pro textové popisy kratších stabilních seznamů už léta používám funkci VBA, která se volá pořadovým číslem položky v seznamu. Pro názvy měsíců by ta funkce mohla vypadat následovně:
Function Mesice(Cislo As Long) As String
Dim Text As String, Seznam As Variant
Text = "Měsíce: Leden Únor Březen Duben Květen Červen Červenec Srpen Září Říjen Listopad Prosinec"
Seznam = Split(Text) ' Split má LBound=0, proto do jeho 1.položky dávám význam seznamu
Select Case Cislo
Case 1 To UBound(Seznam): Mesice = Seznam(Cislo)
Case Else: Mesice = "?????"
End Select
End Function
Podle tohoto mustru si každý může vyrobit obdobnou funkci pro svůj vlastní seznam.citovat
Function Mesice(Cislo As Long) As String
Dim Text As String, Seznam As Variant
Text = "Měsíce: Leden Únor Březen Duben Květen Červen Červenec Srpen Září Říjen Listopad Prosinec"
Seznam = Split(Text) ' Split má LBound=0, proto do jeho 1.položky dávám význam seznamu
Select Case Cislo
Case 1 To UBound(Seznam): Mesice = Seznam(Cislo)
Case Else: Mesice = "?????"
End Select
End Function
Podle tohoto mustru si každý může vyrobit obdobnou funkci pro svůj vlastní seznam.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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
Vynásobit hodnoty kurzem - Power Query
lubo • 25.4. 19:18
Relativní cesta - zdroje Power Query
elninoslov • 25.4. 15:12
Relativní cesta - zdroje Power Query
Alfan • 25.4. 15:08
Relativní cesta - zdroje Power Query
elninoslov • 25.4. 14:21
Relativní cesta - zdroje Power Query
Alfan • 25.4. 10:49
Relativní cesta - zdroje Power Query
elninoslov • 25.4. 10:47
Relativní cesta - zdroje Power Query
Alfan • 25.4. 10:40
RSS nejnovější články