Ale to si mal napísať, že si myslel "vlastnú funkciu". Aj MOD je funkcia aj WEEKDAY.
A mohol by sivysvetliť, čo si týmto myslel?
(ne pomocí funkce, to jde)
Snáď to pôjde.
Alebo takto
A pre excel 2003 daj tento vzorec
=IF(ISERROR(VLOOKUP($A10;INDIRECT(C$9 &"!A:C");3;0));"";VLOOKUP($A10;INDIRECT(C$9 &"!A:C");3;0))
IF=když
VLOOKUP=svyhledat
INDIRECT= nepřímý.odkaz
ISERROR= neviem asi JE.CHYBA
A nestačilo by niečo takéto pre excel2007 a viac.
Makro si môžeš uložiť do "osobného zošitu makier" a budeš ho mať kedykoľvek k dispozícii, keď si otvoríš excel.
Elegantnejšie riešenie na úpravu ďalších atribútov tlače ti tu ťažko niekto urobí.
No podľa tvojej prílohy si makro spustíš iba raz a to si samo otvorí tie tvoje zošity a aj vytlačí.
Daj si zaznamenať makro, urob si potrebné zmeny. A pred tlačou si to makro spusti.
Teda nejakú funkciu použiť treba
=A1-MOD(A1+6;7)-21
Alebo pomocou funkcie
=A1-WEEKDAY(A1)-20
V bunke A1 je dárum 24.12.20xx
Daj si to transponovať na iný list.
Kopírovať a potom prilepiť špeciálne.
A potom použi normálne filter.
A potom tento postup ešte raz na ďalší list.
No tak s tým počítaj.
Ja som pripočítal 1 a dátum sa zvýšil.
Doplnil som.
Neviem, čo si predstavuješ pod slovom HODNOTA, ja som tam dal DÁTUM.
Ty jsi to asi nepochopil, já tam nechci obsah S z listu1 ale jen část a to od znaku 11 v délce 10 a to pevést na hodnotu tak jak to mám ve vzorci a pokud na listu1 je prázdno, tak se naplní prázdno i do listu2 na S. proto taky po zkopírování z listu1 do listu2 ten sloupec S na listu2 MAŽU.Potřebuju ten vzorec přepsat do makra.....
Blbosť si napísal ty.
Skús tam dať toto.
For i = 2 To Sheets("List1").Cells(1, 1).CurrentRegion.Rows.Count
Sheets(2).Cells(i, 19) = Mid(Sheets(1).Cells(i, 19), 11, 10)
Next
Sheets("List2").Columns("S:S").NumberFormat = "dd/mm/yyyy"
Do listu2 skopíruješ list1 a potom ten list2 zmažeš?
Veď na to netreba makro. Proste nič nerob a budeš to mať, ako si napísal.
No v zadaní makro nebolo spomenuté. Jasné, že makrom je to elegantnejšie a netreba duplikovať ovládací prvok.
Navrhol som to ako alternatívu. Napríklad pre OPEN OFFICE.
@eLCHa
To mi v tejto tropickej noci akosi nenapadlo . Chcel som aby to robilo iba v oblasti DATA1. Ten prienik (data1 E:E) je pekný. Nedávno som ho tu tiež použil.
To OPAKOVAT mi došlo až na samý záver, keď som to chcel vylepšiť. Akosi mi ušlo, že to vlastne nahradzuje pôvodný IF.
ide aj takto, pre prípad, že by tie hlavičky neboli presne v poradí.
=OPAKOVAT(E$3;COUNTIF(data1 E:E;MIN(data1)))
A pokiaľ ide o tie duplicity, autor to asi bude riešiť až nastane ten prípad.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.