Včera jsem v excelu pracoval a dělal úpravy a na konci dne opět zkusil. Výsledek exportu byl zase na jiném místě, tak tomu sám moc nerozumím.
Application.Goto .Cells(1, 1), True, vypadá že funguje, vyzkoušel jsem to na všech co mám zatím k dipozici a krásně do odkazuje na A1.
Děkuji Vám moc a přeji hezký den
Měl bych ještě jeden kosmetický dotaz. S makrem nemám žádný problém, tak jak jste mi to připravil tak to funguje bezvadně.
Ted mám spíš kosmetický problém viz příloha. Zkoušel jsem to na X různých listech a souborů a pokaždé se nový soubor vygeneruje jinak. Přílohou zasílám, že jsou označené položky a ještě na konci excelu. Na jiném to bylotřeba uprostřed excelu a občas to je i na začátku tak jak to má být a nebo i s jiným zoomem. Zkoušel jsem nastavit plochu tisku, srovnat výkazy, ale nepodařilo se mi to najít to, aby se nový excel pokaždé vygeneroval na prvním řádku.
Máte prosím radu, podle čeho bych listy mohl nastavit tak aby se generovali stejně?
Děkuji Vám za celé makro a za Vaši trpělivost :)
Zdravím,
děkuji moc za super popisy, moc mě to pomohlo a už je mi to pro laika téměř jasné :) Ideální je pro mě hned tne první seznam, raději upravím více makro a ostatní to nebudou muset řešit vůbec. Měl bych ještě dva dotazy.
A) Zkopíroval jsem VBA pro svého souboru a při spuštění makra, mě to hodí chybu hned na prvním řádku. Nevím jestli nějaký název musí být stejný, ale když jsem svoje listy nakopíroval do Vašeho souboru tak to vše fungovalo. JmenoListu = wsSeznam.Cells(wsSeznam.Shapes(Tlacitko).TopLeftCell.Row, 1).Value
B) Zistenie názvu listu podľa hodnoty v stĺpci A, na riadku so stlačeným tlačítkom, lze mít tlačítko na stejném řádku, ale aby to kontrolovalo třeba podle sloupců A, C a E? Pokud by to byl velký problém a komplikace tak to prosím neřešit.
Popsal a zpracoval jsem to tak krásně že tomu rozumím V úterý budu v práci tak to vyzkouším aplikovat na to, na co potřebuji.
Je škoda, že to nejde jak jste psal že to nejde :) To Vaše první makro, kde bych si měnil jen název listu a sloupce jaké bych potřeboval.
K tomu prvním makru ještě prosím:
Jak mám zadat With .Range("F:G").Resize(R) - Aby to vymazalo vzorce pouze ve sloupci F a G? Zkoušel jsem to najít v tom novém makru, ale to je pro mě ještě víc nepochopitelné
Omlouvám se, za moji špatnou specifikaci. Přílohou zasílám list se zadáním a níže odpovědi na Vaše otázky.
List seznam- Zde by mělo být X listů a tlačítka na základě kterých bych listy exportoval.
Ostatní listy
Sloupce E a G - vložit jako hodnoty a odstranit vzorce
Sloupce L a M - vymazat jejich obsah stačí
2. Exportovat se má pouze 1 list
3. Ano tak bych si to představoval, do budoucna bych to rád rozšířoval
4. Sloupce jsou jen příklad, ty se budou měnit pravděpodobně u každého listu zvlášť (to si pak budu upravovat)
5. To jste měl správně, jen aby tam byla výsledná hodnota
6. Stačí jen obsah
7. Listy mají odsazení, ale to pro mě nehraje roli, vše se může provádět od 1 řádků
8. Nedá se určit, buňky nejsou popsané u každého řádku. Takže to bude variabilní, ale max to bude 1000 řádků (jestli je nutná hodnota)
9.10. - není třeba, stačí tak jak to bylo, jen nový soubor
11. V těchto buňkách jsou vstupní data, takže je stačí jen smazat.
Ještě jednou Vám moc děkuji.
Tom
Super díky moc.
Jen bych měl ještě dva dotazy.
A) Jak se v makru odkážu na jiný list? Chtěl bych toto provádět ze seznamu a rovnou aby se exportovali jiné listy.
B)Jak mám zadat With .Range("F:G").Resize(R) - Aby to vymazalo vzorce pouze ve sloupci E a F? Zkoušel jsem různé možnosti, ale nepodařilo se mi
Ano je to přesně jak píšete
Ještě bych poprosil o doplnění do makra, aby se vymazali sloupce N a O, pak už to bude snad dokonalé.
Neumím absolutně pracovat v makrech, ale předpokládám, že pak pochopím jak změnit názvy listů a sloupců.
Předem moc děkuji.
Zdravím,
bohužel na to nemůžu přijít a tak bych Vás rád poprosil o radu.
Potřeboval bych makro na zkopírování listu AAA, který by se otevřel v novém okně a zároveň se ve sloupcích F a H vymazali veškeré vzorce. List bych rád v novém okně, abych jej rovnou mohl uložit pod jiným názvem.
Předem děkuji za pomoc a přeji hezký den.
Tom
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.