< návrat zpět

MS Excel


Téma: automatizace pomocí VBA rss

Zaslal/a 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. 7
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: xlsx40037_sesit1.xlsx (13kB, staženo 37x)
Zaslat odpověď >

Strana:  « předchozí  1 2
#040103
avatar
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 1 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
#040104
elninoslov
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
#040105
avatar
Jsem si říkal že to bude trochu jinak 4 njn 1citovat

Strana:  « předchozí  1 2

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