• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: datum s čárkami

Zaslal/a jaks.dalibor 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ě.

Příloha: 19109_datum_s_carkami.rar (6kB, staženo 27x)

Zaslat odpověď >

---

Strana:  « předchozí  1 2 3 4

Opičák(26.4.2014 18:48)#019151

a co takhle ?
nevím kdo je autorem UFormu, je jen nepatrně doplněný.
datum do sloupce B je možné zapsat, když je "odfajfknut" CheckBox

Příloha: 19151_kalendar-do-slb.zip (44kB, staženo 23x)

citovat

marjankaj(26.4.2014 19:01)#019152

eLCHa napsal/a:

Nicméně jak správně řekl Opičák - urazit jim prsty - správné řešení už tu taky bylo - Data-Ověření - a naučit je zadat datum

No ja na numerickej klávesnici zadávam dátum s "/" a prevedie mi to na ".". Je to hneď nad číslami, takže žiadny problém s tým nemám.
Asi fakt najlepšie bude overenie údajov s návodom ako treba zadať dátum. Nech sa to naučia aj analfabeti.citovat

jaks.dalibor(27.4.2014 0:18)#019158

chlapi špízněte, udělal jsem vstupní formulář, který se zobrazí po kliknutí do jakékoliv buňky A5:A10005 . Ještě musím doladit, aby se mi po stisknutí tlačítka zrušit nebo křížku to datum tam nenapsalo. Bude mi dokonce i vyhovovat, že obsluha programu neovlivní datum a bude aktuální. Mezi datumem a událostí je schválně mezera, tam bude automatické číslování (to taky zatím nevím jak ), ale pokroky dělám.

Příloha: 19158_vstupni-formular.rar (23kB, staženo 24x)

citovat

Opičák(27.4.2014 15:13)#019161

Tak a teď tu píšeš " bude mi dokonce vyhovovat, že obsluha programu neovlivní datum" . Tímto směrem se možná mělo všechno ubírat od začátku a neřešit čárky. Datum prostě natvrdo a fertig. Ale přesto jsem upravil to co jsi poslal tak, jak bych to řešil já. Datum natvrdo, ale s možností změny.

Příloha: 19161_kopie-vstupni-formular1.zip (25kB, staženo 24x)

citovat

jaks.dalibor(27.4.2014 19:20)#019164

to Opičák, s tím datumem to ještě přehodnotím, rozhodně to taky nevypadá špatně, díky.

Ale, to all : pročistil jsem trochu ty kódy a chtěl bych ještě jednu věc, která se mi ale nedaří. Když kliknu do pole A5:A10005, tak mi naskočí formulář Userform2, kde doplňuji data. Potřeboval bych, aby v témže listě po kliknutí do pole K5:K10005 naskočil formulář Userform3. Nevím, co dělám špatně, ale nějak se mi to nedaří. Help somebody???

Příloha: 19164_vstupni-formular.rar (27kB, staženo 23x)

citovat

cmuch(28.4.2014 5:47)#019168

Upravene makro.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim oblast1 As Range, oblast2 As Range
Set oblast1 = Range("a5:a10005")
Set oblast2 = Range("k5:k10005")
If Not Intersect(Target, oblast1) Is Nothing Then 'aby to fungovalo jen pro vymezenou oblast
On Error GoTo err
If Target = "" Then
UserForm2.Show
End If
ElseIf Not Intersect(Target, oblast2) Is Nothing Then 'aby to fungovalo jen pro vymezenou oblast
On Error GoTo err
If Target = "" Then
UserForm3.Show
End If
End If
err:
End Subcitovat

Strana:  « předchozí  1 2 3 4

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse