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

MS Excel

Téma: automatizace pomocí VBA

Zaslal/a veny 3.4.2018 13:20

Ahoj všem
měl bych na vás prosbu. Chtěl bych zjednodušit určité operace a bez VBA se neobejdu. Přikládám jednoduchý soubor vygenerovaný z jiného programu.
co potřebuji:
Převést tabulku na Tabulku s tím že první řádek je vždy záhlaví a aktivovat řádek souhrnů.
Dále bych potřeboval vložit vlastní Záhlaví a Zápatí (tady mám problém, že jsem nedohledal přesný postup jak si uložit vlastní záhlaví a zápatí) Vytvořit není problém, problém je ten že i když jsem sešit uložil jako šablonu do složek XLStart
tak při otevření excelu po vygenerování souboru není tato možnost v "Rozložení stránky-Vzhled stránky-Záhlaví a Zápatí" vidět.
Někdy bude potřeba odstranit určité sloupce, takže v tomto případě by to mohly být sloupce A a B.
Našel jsem tu článek na přizpůsobení pásu karet (Ribbon) podle kterého plánuji připravit tlačítka ke kterým bych přiřadil poupravené makro podle toho který ze sloupců by bylo potřeba odstranit. Takže vlastně několik tlačítek s hodně podobným kódem. Vyvstává otázka, jestli by nebylo dobré operace které budou stejné mít pro všechny tlačítka stejné a jen nějakou cestou přiřadit změnu odstraňovaných sloupců.
Všechno toto půjde potom na tisk do defaultní tiskárny, ale to už bych nějak dohledal a přidal.
Asi trochu obšírnější dotaz, nicméně jakékoliv další info dodám.
Díky V.

Příloha: 40037_sesit1.xlsx (13kB, staženo 36x)

Zaslat odpověď >

---

Strana:  « předchozí  1 2

veny(11.4.2018 11:22)#040103

přidal jsem si filtr na odstranění nulových řádků
ActiveSheet.ListObjects("tblDruhy").Range.AutoFilter Field:=2, Criteria1:=" <>0 ", Operator:=xlFilterValues
i když jsem musel pátrat no alespoň se člověk něco přiučí
Kontrola na existenci dat i součet plně funkční
Odstranění posledního sloupce u mě nefunguje, zkoušel jsem ho smazat jak přes "Přípravu dat" tak ručně v tabulce i Tabulce a pokaždé to šlo. Nicméně toto pro mě není důležité.
Zatím je to vše co potřebuji. Budu ještě dolaďovat až budu mít k dispozici všechny druhy výstupních tabulek, takže se možná ještě ozvu.
Prozatím moc děkuji
V.citovat

elninoslov(11.4.2018 16:28)#040104

Zabráneniu vymazania posledného stĺpca ste neporozumel. Ja nemám na mysli posledný stĺpec v poradí v tabuľke, ale posledný zostávajúci (nevymazaný) stĺpec tabuľky. Logická úvaha: Načo spúšťam makro na vymazanie 5 stĺpcov z 5-stĺpcovej tabuľky ??? Aby som spracovával "žiadne" dáta ??? Teda ak je zostávajúci počet stĺpcov tabuľky 1, nedovolí Vám ho zmazať. On samozrejme zmazať ide, ale je to logický nezmysel.citovat

veny(11.4.2018 17:25)#040105

Jsem si říkal že to bude trochu jinak njn citovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse