Příspěvky uživatele


< návrat zpět

Strana:  1 2 3 4 5 6 7 8 9   další » ... 13

no jo... moje chyba, neuvedl jsem verzi, mam starsi 2019, tam FILTR není...

to Anonym(31.3.2023 12:30)citovat
Dik, ale to není ono. Vyřadí nuly poize pokud jsou na konci řádku nabo sloupce ale nuly mezi hodnotami ponechají. Chci v grafu zobrazit POUZE nenulové hodnoty

Dobrý den
potrebuji poradit s grafem. V listu chci vedle tabulky 2 sloupcové grafy POUZE z NENULOVÝCH údajů v tabulce - radek s 0 se v grafu neobjeví. Na daném listu nemůžu nic menit, může se přidat (skryty) list...
Děkuji

elninoslov napsal/a:

Dnes som mal žiaľ neplánovaný online zásah cca 5 hod. Nestíham. Zatiaľ som popísal len makro. Pridal som ošetrenie chýb a výpis výsledkov. Lepšie popisovať neviem. Nie som učiteľ.
PQ musí ešte počkať...Příloha: 51776_csvtoexcel.zip (32kB, staženo 4x)


Díky moc, elninoslov
funguje rychle, spolehlivě, česky..
Díky za dokonalý popis.
Do nového roku Vám přeji hlavně zdraví a trochu toho štěstí a zůstaňte i nadále aktivní na tomto webu. 1

elninoslov napsal/a:

@ GeorgeK: Zkoušel jsem PQ...
Ale v prílohe žiadny PQ pokus neposielate. Veď je to, čo som Vám poslal ja, nie??? To čo nežerie UTF-8. Teda tej Vašej prílohe nerozumiem.
Čo znamená, že sa obávate o rýchlosť? Koľko tisíc riadkov má to CSV? Koľko desiatok CSV súborov budete na jeden klik spracovávať? Koľko "dotazov" budete spúšťať v desiatkach klikov? Do koľkých stoviek buniek budete načítavať údaje?
EDIT:
Malý test. Cez to ADO načítam CSV o 11000 riadkoch, a z neho 60 rôznych hodnôt z rôznych súradníc do rôznych buniek za cca 0,35s
EDIT2:
A teraz ešte rozmýšľam ... Vy vždy viete číslo riadku v CSV? Nechcete Vy náhodou zisťovať nejaký údaj pána Mrkvičku na riadku X, kde má aktívnu žiadosť, alebo ešte aj inú podmienku?


Ano, přiloha je ta "stará" - jen je přidaný vzorový csv soubor a uprava cesty k souboru. PQ jsem si zkoušel jen tak ..mimo :-)
Raději bych vynechal PQ, protože táto akce/makro by měla pracovat ještě nějaký ten rok a nedělám si iluze o znalostech mých následníků - čili klidně pomalejší ale jednodušší /srozumitelnější kod.
CSVsoubor plynule narůstá, neumazává se. během roku přibude asi 1000řádků. Z tohoto souboru vytahuji VŽDY jeden řádek (obvykle první, ale chtel bych mit tuto položku volitelnou (v reálu asi mezi 1-10))
Ten váš původní kód je dostačující jen ta čeština. Pokud by to šlo s využitím ADO/FSO aby to korektně zpracovalo UTF-8 uplně by to stačilo. I ten nápad s tabulkou "KamCoZapsat" je výborný - uživatelsky přehledný a umožnuje změny.
Díky za váš minulý i budoucí čas 1

eLCHa napsal/a:

@GeorgeK
Umožňuje PQ načíst data do JEDNOTLIVYCH buněk?

Přímo ne. Ale pokud nahrajete výsledek powerquery (který si upravíte třeba tak, že výsledkem bude tabulka o 1 řádku a 1 sloupci) do datového modelu bez načítání do listu, pak to lze.=CUBEVALUE("ThisWorkbookDataModel";CUBEMEMBER("ThisWorkbookDataModel";"[Measures].[Součet Sloupec11]"))

tohle už je nad mé schopnosti, s datovým modelem jsem nikdy nedělal...

elninoslov napsal/a:

Skúste ešte to ADO.
Ak bude treba, spravím a pošlem neskôr. Možno na večer...

Zkoušel jsem PQ, dá se několik věcí upravit/nahradit už při exportu. Zápis makra je ale na mne hodně komplikovaný.
Nevím jak by to bylo rychle při zracování, ale napdlo mne v dotazu osekat řádky a sloupce na výslednou bunku a tuhle "zapsat do...". Těchto dotazů pak spustit několik pro různé buňky... Co vy na to? :-)

elninoslov napsal/a:

Presne teraz keď čítam o UTF-8 ma napadlo PQ :) Čo si pamätám tak vo VBA je UTF-8 problém, a nešlo to tuším ani cez FSO a čarovalo sa tuším s ADO ...

Umožňuje PQ načíst data do JEDNOTLIVYCH buněk?

eLCHa napsal/a:

Již vyřešeno, ale jen poznamenám.
Zbytečně VBA - dnes už je lépe a jednodušší řešit přes PowerQuery

nevím CO je vyřešeno, já ještě nemám :-)

elninoslov napsal/a:

Tak teda jeden hókus-pókusPříloha: 51728_data-z-csv-podla-suradnic.zip (19kB, staženo 2x)

:-) pěkné čarování...DÍK
trochu jsem si to upravil, pracuje BLESKUrychle...
Ale čeština je problém. Dá se někde "nastavit" utf-8?
přikladám makro a test soubor CSV

Díky
elninoslov
Stalker

funguje 1

Stalker napsal/a:

GeorgeK napsal/a:veny napsal/a:když budu mít buňku a ...

Jedna rychlovka, vybereš (označíš) požadované buňky a klikneš na tlačítko.

Díky, ale v řádku
Set ArrList = CreateObject("System.Collections.ArrayList")
to hodí chybu "Automation error" :-(

elninoslov napsal/a:

Ale Vy si môžete určiť aj ktoré stĺpce sa majú ignorovať.
...Tabuľka, alebo CSV rozobrať makrom v cykle a pomocou Split().

O výběru sloupců vím, mě jde o to zda je možné (a jak) přímo z csv vybrat např 5.položku prvního řádku a zapsat do "List1" buňka A3 a 2. položku 1 řádku do B5.
Z csv chci naplnit "vstupní formuář" (10 různých údajů z csv, klasický zápis do konkretní buňky na listu), který se zkontroluje popř. upraví a až násdně se údaje zapíšou a pak vytisknou.

Dobrý den.
Mám csv soubor - data oddělena středníkem.
Při klasickém importu si můžu určit od kterého řádku chci data načíst.
Jakým způsobem by se, s použitím VBA, daly načist pouze některé položky (buňky) z řádku souboru csv?
Dá se to bez ukladání všech dat to "tabulky" a z ní pak vybirat potřebné buňky?

veny napsal/a:

když budu mít buňku a v ní hodnotu 20 a formát třeba hodiny tak do buňky zapíšu 20 a ukáže se 20 hod.
a GeorgeK chce aby makro vzalo z této buňky její obsah tzn. "20 hod." a překopírovalo to do jiného sloupce kde bude formát Obecný ale bude vidět "20 hod." (Pravděpodobně jako text)

BINGO 1


Strana:  1 2 3 4 5 6 7 8 9   další » ... 13

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