< návrat zpět

MS Excel


Téma: datum s čárkami rss

Zaslal/a 25.4.2014 19:23

zdravím opět odborníky, řeším malý úkol. Do deníku mi lidé píší datum, problém nastává, že někteří jsou zvyklí psát datum na numerické klávesnici a tudíž s čárkami. jednoduchým makrem jsem schopen čárky nahradit tečkami, s obtížemi jsem schopen změnit poté i formát z obecného na datum. Ale když si rozkliknu automatický filtr, tak se mi takové datum "nazařadí do daného roku", dokud ho ručně nepřepíši s tečkami. Napadá vás něco? V přiloženém dokumentu jsem makro nedával. Některé lidi bohužel nenaučím to zadávat správně. 7

Příloha: rar19109_datum_s_carkami.rar (6kB, staženo 28x)
Zaslat odpověď >

Strana:  1 2 3 4   další »
#019110
avatar
Ahojky, nevím jestli to bude to pravé, ale co to tak zkusit přes ověření dat. Viz ukázka.
Příloha: rar19110_datum_s_carkami.rar (7kB, staženo 27x)
citovat
#019111
avatar
ahoj, myslíš, jako že by při špatném zadání to vyhodilo třeba hlášku: "Zadej datum s tečkami"? To by šlo, o této variantě vím, jen jsem si myslel, že jim to ulehčím, protože máme v práci software, který když do něho zadáte datum s čárkami, tak se to samo změní na tečky, takže by to bylo tak, jak jsou zvyklí.citovat
#019112
avatar
Ahojky, tak jsem to myslel, akurát, že při špatném formátu a zároveň i když budou mimo rozmezí vyhodí tu hlášku..
Případně je naučit klavesovou zkratku.
Příloha: jpg19112_hlaska.jpg (26kB, staženo 27x)
19112_hlaska.jpg
citovat
#019113
avatar
Případně nainstalovat doplňek kalendář. Pak stačí,aby dali na patřičnou buňku pravý klik a vložit datum.Tento doplněk není moje moudro, ale je stažen z netu.
Příloha: rar19113_kalendar.rar (41kB, staženo 27x)
citovat
#019115
avatar
chyba bude někde jinde, teď jsem přišel na to, že když dám normálně Ctrl+F (najít čárku) a Ctrl+H (nahradit tečkou), tak to normálně funguje, zamění se čárky za tečky a chová se to jako datum. V momentě, kdy to dám do makra, tak to nefunguje, viz. příloha.
Příloha: rar19115_datum_s_carkami.rar (14kB, staženo 27x)
citovat
icon #019116
eLCHa
@a.mlady
Pokud zde dáváte přílohy, které jste sám nevytvořil, je nanejvýš vhodné vložit odkaz na původní umístění nebo alespoň zmínit autora.
http://excelplus.net/doplnek-kalendar/citovat
#019117
avatar

eLCHa napsal/a:

@a.mlady
Pokud zde dáváte přílohy, které jste sám nevytvořil, je nanejvýš vhodné vložit odkaz na původní umístění nebo alespoň zmínit autora.
http://excelplus.net/doplnek-kalendar/


Omlouvám se, ale nevzpomněl jsem si odkud jsem to stahl a proto jsem uvedl, že to není moje.citovat
#019118
avatar
chlapi, nehádejme se, zkusme popřemýšlet, proč to funguje ručně a né s makrem ...citovat
#019121
Opičák
zkus to takhle:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
For i = 2 To 20
dx = Split(Cells(i, 1), ",")
Cells(i, 1) = DateValue(dx(2) & "/" & dx(1) & "/" & dx(0))
Next i
On Error GoTo 0
End Sub


edit:
proč to nefunguje, podle mě protože je to text (s čárkama) ve kterým se JEN změní čárky za tečky, ale furt to zůstává textem a ne číslemcitovat
#019123
avatar
Opičáku, na tebe je spoleh (sorry chlapi). funguje to, ale je pravda, že jsi mě dostal, tyto příkazy jsem ještě neviděl, kdybys měl chvíli, mohl krátce popsat, co ten skript dělá? hlavně nevím to "dx" a "split".citovat

Strana:  1 2 3 4   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