Pokud by se někomu chtělo zkusit to makrem byl bych vděčen i za tuto alternativu
Dík
elninoslov napsal/a:
Skúsim iba zľahka.
Pomocný stĺpec je v oboch Tabuľkách na konci - skrytý.
Vypozoroval som, že dátumu vždy predchádza "/".
...fertig
elninoslov napsal/a:
Najjednoduchší spôsob vzorcami je asi takto - pomocný stĺpec v každej Tabuľke.Příloha: 45969_45965_infokopie.xlsx (32kB, staženo 1x)
Hezký den
Ofice 2016,
tabulka je Tabulka, pevný počet sloupců, řádky přibývají.
Potřebuji nají řádek v "AB20", který splňuje datumovou podmínku zadanou v "Datum" a zkopírovat ho do "Kopie".
Vyhledávané datumy jsou v sloupcích "Datum a číslo odp".
Problém je v zadání data... txt020086/30.01.2020
text před lomítkem je různý, datum může být ve formátu
dd.mm.rrrr i d.m.rrrr a kombinace. ROK je vždy 4místný.
Pokud se v řádku objeví více datumů splňujících podmínku, řádek se kopíruje jen jednou.
V listě "Kopie" se vyhledávané datumy v daném řádku podbarví (žlutě).
Děkuji za vaše nápady, rady..
veny napsal/a:
ahoj
já používám tento doplněk a datum vkládám přes pravý klik v buňce kdy se aktivuje kalendář
edit: pravý klik a "Vložit datum"Příloha: 45957_kalendar_vba.zip (66kB, staženo 2x)
Milan-158 napsal/a:
Ahoj,
Takže vyzkoušejPříloha: 45911_kalendar_bezactivex_upraveny_md2.7z (34kB, staženo 8x)
Dobrý den
požadavek: jednoduchý způsob zadávání datumu (dvojklik v buňce). Stavajicí Excel 2016 (předpoklad asi ke konci roku přechod na 2019).
Něco jednoduchého ve VBA. Doinstalování nějakých dopňků nelze, podniková síť.
Předpoklad: po dvojkliku se objevi malý "kalendář" ze kterého vyberu datum. kód/formulář by se dodal do těch sešitů, kde bude potřeba.
Děkuji za nápady, odkazy, řešení....
EDIT: Win7/64bit!
hezký den.
Palooo napsal/a:
pardon otestoval som to este raz a mate pravdu nerobi to dobre.
..... hadam som pomohol
Palooo napsal/a:
pretoze ste premenovali sheet:
Range("A1:I222").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Sheets("01 SELECTIVE SWITCH ").Range("N1:O2"), Unique:=False
Vložena příloha.
Netrvám na "rozšířeném filtru".
Vyfiltrovat položku, vyfiltrovat dle data (od-do) a překopirovat na příslušný list.
V realu bude max 2000 řádků a do 10 výběrových položek které se budou kopirovat na vlastní list.
Ale satčí mi menší příklad jak "obejít" problém s datumem.
Děkuji
Dobrý den
v přiloženém souboru je nahrané makro - použití rozšířeného filtru.
"Ručně" pracuje , po spuštění ne.
Vím o problému s "formátem datumu" ale nevím jak jej elegantně vyřešit. Je to tabulka stažená s netu. Vlastní je podobná - potřebuji filtrovat dle jedné položky a data.
Datum v rozmezi OD-DO, vybraná konkretní "Product" a tuto vyfiltrovanou tabulku zkopírovat na list P-2.
Díky za vaše rady
elninoslov napsal/a:
Skúste na kópii dát.
...
Skúste na kópii dát.
Ak by išlo o viac listov (desiatky), stálo by za zváženie uložiť ich na pozadí v novej inštancii Excelu,
Díky, vyzkouším.
Jedná se (v současnosti) o 5 listů. Max to vidím do 10.
elninoslov napsal/a:
Chcete aby som Vám to upravil nech to spraví všetky listy ?
Stalker napsal/a:
wsNew.PasteSpecial (xlPasteValues)
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.