Příspěvky uživatele
< návrat zpět
Ahoj, toto by mohlo pomoci https://office.lasakovi.com/excel/vba-soubory/excel-vba-kdo-pristupuje-do-souboru/ ;)
Ahoj. Prosím o pomoc.
V rámci níže uvedeného makra provádím aktivace doplňku "SapExcelAddIn". Ale stává se, že v určitých intervalech se tento doplněk stane zakázaným a toto makro jej neaktivuje. Musím jej nejprve přes doplňky povolit a teprve poté lze makrem aktivovat.
Je prosím možné nějakým makrem doplněk povolit a aktivovat i když bude mezi zakázanými doplňky?
For Each addin In Application.COMAddIns
If addin.progID = "SapExcelAddIn" Then
If addin.Connect = False Then
addin.Connect = True
ElseIf addin.Connect = True Then
addin.Connect = False
addin.Connect = True
End If
End If
Next
Děkuji
V historii předchozích verzích nejsou nějaké jiné verze, kde by byla vidět nějaká změna před posledním uložením?
mepexg, děkuji za tip. Přes PQ jsem to v jedné z prvotních variant zkoušel. Ale opravdu jsem se pak dostával na hodně veliké zdrojová data a tím, že výsledný report pracuje s dalšími cca 8 zdroji, které jsou taky relativně velké, tak bych chtěl vyzkoušet i vyfiltrování a doplnění jen potřebných dat do samostatného souboru (data do něj jsou denně přidávána) a s tím pak dál pracovat v PQ a Pivotu. Předběžně se tak velikost sníží na 1/3 a po pár měsících tak budu načítat "jen" cca 30MB místo necelých 100MB. Popřípadě jsem bojoval s dobou načítání a aktualizace dat kvůli narůstajícímu počtu souborů a když načítám data z 1 většího souboru je to u mě rychlejší, než třeba z 30.
Dobrý den,
chtěl bych vás poprosit o pomoc s nastavením filtru ve VBA. Z přiloženého souboru potřebuju vyfiltrovat a zkopírovat řádky vybranými údaji do jiného souboru. Aktuálně mám postavené makro tak, že jede řádek po řádku a pokud podmínky odpovídají, tak řádek zkopíruje. Nicméně makro takto trvá 5-8min.
Napadlo mě využití filtru a následně zkpírování celého rozsahu ale netuším jak filtr nastavit:(
Ze zdrojového souboru potřebuju vyfiltrovat datum 14.,15. a 28.5. a všechny týmy mimo ty, které mají v názvu Distribuce.
V makru budou týmy fixně nastavené (vše mimo Distribuce), datum bude proměnná - report je generovaný denně a vždy budu potřebovat první dvě nejdřívější data + poslední datum.
Když jsem zkusil makro nahrát, tak u týmů bych musel vypsat jeden tým po druhém, což moc nechci z důvodu budoucích možných změn v počtu/názvech týmů a mohlo by se na následnou úpravu makra zapomenout.
Je možnost přes makro ve filtru nastavit, ať vybere vše mimo vybrané týmy + jen 3 konkrétní data a ostatní bude ignorovat?
Nebýt obrovské velikosti souborů, řešil bych přes PQ ale denně se vygeneruje kolem 3Otis řádků a report, pro který data připravuju, bude muset fungovat ideálně v pololetních intervalech a co jsem zkoušel, byla by velikost už ne moc akceptovatelná a stejně tak případná doba aktualizace reportu. Proto řeším tímto kopírováním jen potřebných dat a s ním následně dál pracuju.
Moc děkuji za případnou pomoc a ukázku kódu nastavení filtru nebo odkaz někam, kde už to bylo řešeno. Mi se najít nic nepovedlo 
Soubor se mi neukládá (kvůli velikosti?). Tak přikládám odkaz. Heslo pro otevření je "WallDotaz"
https://uloz.to/file/ZJkrbnOoNpqg/zdrojovy-soubor-zip
mepexg napsal/a:
Dobrý deň. Najskôr trochu k Vašej požiadavke. Zdrojové údaje tj. dátum s časom zaokrúhlite na 30 minút, aby sa to dalo pripojiť. Nezdá sa mi vhodné mať v jednej tabuľke dátumy a časy po 30 min. Skôr by som navrhoval dátum od času oddeliť do dvoch stĺpcov a tie prepojiť na dve tabuľky tj. zvlášť kalendár dátum a z toho vyplývajúce stĺpce rok, kvartál, ......
Dobrý den, děkuji moc za podnět! Tento "kalendář" chci využít jako jedinečný identifikátor a "bod" na který budu moci napojit různé další zdroje dat. Zkouším vytvořit jeden rozsáhlejší report, u kterého jsem objevil i relace a propojování x zdrojů dat do jednoho "balíku" a teď se s tím vším zkouším naučit pracovat. A onen kalendář je aktuálně asi jediný identifikátor, který je shodný u všech zdrojů a chci jej použít pro vzájemné propojení a požití časových filtrů. Když jsem využil intervaly ze zdrojových dat, tak ne u všech mi do fungovalo a doufám, že díky tomuto se pohnu trochu dál
eLCHa napsal/a:
Power query, např. něco takového
let
Casy = let
Zdroj = { Number.From(0)..Number.From(47) },
#"Převedené na tabulku" = Table.FromList(Zdroj, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
#"Přidané: Vlastní" = Table.AddColumn(#"Převedené na .....
Děkuji za tip. Zkusil jsem přes Power Query a mám hotovo (do řádků jsem si dal data, do sloupců časy. Ty jsem pak zkopíroval na všechny řádky a přes PQ provedl převedení sloupců s časy na řádky a dostal jsem, co jsem potřeboval). Moc děkuji za tip a nakopnutí!
Ahoj,
využíváme níže uvedené:
Dim Adresa As String
With Workbooks("NAZEV SOUBORU").Worksheets("Pomocny") 'v POMOCNY je uložen seznam přijemců
.Activate
Adresa = .Cells(2, "M")
End With
' Vybrání rozsahu pro vložení dat.
Workbooks("NAZEV SOUBORU").Worksheets("Data pro mail").Activate
ActiveSheet.Range("A1:I100").Select
' Zobrazení "outlooku" v Excelu.
ActiveWorkbook.EnvelopeVisible = True
'Nastavení příjemců, předmětu a odeslání mailu
With ActiveSheet.MailEnvelope
.Item.To = Adresa
.Item.Subject = "PŘEDMĚT MAILU"
.Item.Send
End With
End Sub
Asi by se dalo i lépe napsat, ale i toto funguje :)
Ahoj všem,
dá se prosím nějak v PowerPivot (nebo klidně i jinde) vytvořit tabulka, kde bych měl zobrazeny data na určité období (v řádu x let) a současně každý den rozpadlý na jednotlivé 30min intervaly?
Něco v podobě:
3.4.2020 00:00:00
3.4.2020 00:30:00
3.4.2020 01:00:00
...
31.12.2025 23:30:00
Zkoušel jsem v PowerPivot využít fci Tabulka kalendářních dat (proto zmíněno v úvodu) ale nepodařilo se mi doplnit intervaly. Jen 1 den 1 řádek :/
V makru se mi nedaří zkombinovat cykly a výsledek je víceméně stejný jako v PP
Ve finále tabulka bude doplněna do dat.modelu v PP. Zatím ji chci připravit na 5let dopředu, teoreticky se pak někdy v budoucnu rozšíří (hudba budoucnosti:) )
Moc děkuji za každé tipy, jak toho docílit!
Ahoj, šlo by nejspíš i přes fci svyhledat. Jak psal Stalker, tak zdrojový soubor může s řešením pomoci
mepexg napsal/a:
Ponúkam riešenie pomocou PQ, ktoré berie údaje zo súborov z nastaveného adresára a prezentuje ich pomocou KT (dvoch; 2. skrytá je pre graf vpravo) ovládaných spoločne s rýchlymi filtrami. Stačí doplniť súbor da nastaveného adresára a dať aktualizovať údaje.Příloha: 45405_prehled_pqkt.xlsx (45kB, staženo 5x)
Moc děkuji za řešení!
Jakmile budu mít PQ nainstalované, tak budu pátrat, jak se toto všechno dokázalo:)
fortes napsal/a:
zkoušel jsem a jediné na co sem dokázal přijít, že jsem přejmenoval koncovku souboru
FilePath = FilePath & "_"
viz. zpráva ve vzkazech - zkusím na to pak více mrknout a snad se něco podaří vymyslet:)
AL napsal/a:
Aku verziu excelu pouzivas?
Subor som este niekolkokrat zmenil, stiahni si ho potom este znovu, v poslednej verzii som osetril, aby sa v kontingencke po dnoch zobrazovali i dni, v ktorych nie su hodnoty.
Jednotlive dotazy si mozes pripadne este optimalizovat, ale ako som zmienil, v jadre to funkcne je a je to bez jedineho riadku VBA. Pri novych datach na liste zdroj potom akurat staci aktualizovat vsetko a vysledky v kontingenckach sa prepocitaju.
Zatím máme 2013, kde je nutné PQ doinstalovat :/ Verzi 2016 nám budou instalovat až někdy v r 2020.
Za úpravu tabulky moc děkuji!
AL napsal/a:
Vba nie je potrebne. Ani zoznam skupin nie je potrebny. Cele sa to podla mna da poriesit cez Power Query. )
Děkuji za nástřel možného řešení. PQ aktuálně bohužel nemám ale zkusím si jej nechat doinstalovat a mrknul na řešení.
Co se data týče, tak to jsem přehlédl a neupravil po testování:/ Týdny berem standardně od pondělí:)
Dobrý den, postup uvedený v https://office.lasakovi.com/excel/vba-soubory/excel-vba-kopirovat-prejmenovat-soubory/ by nepomohl?
Po zkopírování souboru by pak mohlo stačit dát podmínku aby makro otevřelo kopírovaný soubor a v něm provedlo potřebné kroky.
Uživatelské menu
\nMenu
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.
RSS nejnovější články