Příspěvky uživatele
< návrat zpět
marjankaj: tak to potom jo, ale zapomněla jsem, že jsem vyměnila ve vzorcích 0 za mezeru, proto mi to nefungovalo. Děkuji.
Elninoslov. Děkuji moc za úpravu, moc mi to pomohlo.
Také chci poděkovat všem, kteří se zapojili do diskuze. Děkuji za vaše návrhy a poznámky.
Stalker: Děkuji za alternativní možnost.
elninoslov: Děkuji, makro s malým cyklem nyní dělá to co chci, to je fajn, jen s malou chybičkou, zatím jsem nepřišla na to proč to dělá. Při kliknutí na tisk, mi vytiskne ne A:I ale B:J od stránky č. 3. Tudíž u příloh vynechává sloupec A, stránka se posune o tento sloupec. Je možné, že je chyba v makru? Po úpravě stránek pro tisk, je to v pohodě, ale po zavření a opětovném otevření souboru se chyba opakuje.
Ten původní kod mi i po odstranění mezer, dělá to stejné, co ten můj původní, tedy tiskne i stránky příloh, které tisknout nechci.
marjankaj napsal/a:
@venali
Ale ZIP snáď funguje. Zbaľ to do ZIPu.
A keď to elninoslov nemal možnosť, kde by ten kód overil, tak to je ťažké. Možno to písal z mobilu.
Tak tady to je.
marjankaj napsal/a:
Predpokladám, že ten kód od elninoslov si ani nevyskúšala.
Ano, vyzkoušela, nevím proč bych jej neměla vyzkoušet... Bohužel nefungoval, excel mi to neakceptoval.
Nelze mi sem nahrát excel ve formátu xlsm, abyste měli představu. Asi dělám něco špatně.
Ještě jednou, ale ono to je asi k ničemu, když to nevidíte. Excel má 1 list o 6 strankách s libovolným textem, kde na druhé stránce je seznam příloh, které lze vybrat, pojmenujme je např. A, B, C, D. Když uživatel vybere např, přílohu A a D, chce aby se vytiskla stránka č. 1,2,3 a 6. Jde tedy o to, aby se stránka 1 a 2 tiskla vždy, a pak dle toho kterou stránku=přílohu vybere. Přílohy jsou tedy na každé stránce ve sloupci B specifikovány =IFERROR(POZVYHLEDAT(List2!A4;$B$89:$B$93;0);"")
Když uživatel vybere danou přílohu přiřadí se mu číslo, na základě kterého chci aby se tiskla pouze čísla od 1 do 4, tudíž když se ve sloupci B96, B144, B191 a B238 ukáže 0, nechci aby se tiskla tato stránka.
eLCHa: záleží na úhlu pohledu, mě jistý příspěvek přišel jako urážka ...
marjankaj: Děkuji, ikdyž vše spojím do jedné, tak je problém stejný.
If Range("B96").Value > 0 Then
Range("A96:I143").Select
End If
If Range("B144").Value > 0 Then
Range("A144:I187").Select
End If
Bohužel nemám s VBA moc zkušeností, proto to zkouším tady.
Ale je hezké, že když člověk poprosí o pomoc, dostane se mu jen urážky.
Ono to není uplně tak jednoduché... ale váš názor, děkuji za něj. Ale stejně se přikláním k tomu, že je tam problém s tím Select a Selection, protože at dělám co dělám, vždy dle mého narazím na ten výběr, že to prostě vybírá vždy i ty přílohy, které obsahují 0, tedy nenesou hodnotu 1 až 4. Ve výsledku je mi jedno jakou tam dám podmínku, jen mi jde o to, zda podmínka a následný tisk do pdf je správně.
add O1:Ano určitě jde o tyto 4 buňky, tam jsou uvedeny čísla dané přílohy, v případě tisku mají 1 až 4, v případě že se tisknout nebudou je tam 0.
add O2: Ano.
add O3: Ano, bylo by to fajn i s přehazovaným pořadí, pokud to ale nepůjde, a je tam nutnost přesného řazení, vyřeším si to, např. zaškrtávacím polem a posléze přiřazením čísla. To už mám eventuálně vyřešené.
Stále jde o to, že jde mi jen o tisk příloh, které mají v buňce číslo od 1 do 4, v případě 0 nechci tisknout, tedy ze čtyř listů pouze ten, který má označení čísla přílohy.
add O4: Ano, všechny přílohy jsou na 1 stránku.
add O5: počet textu se liší, velikosti řádku a sloupců ne, vždy jde o přílohu, která je na 1 stránku o různém obsahu.
add O6: Ne nejsou mezi nimi mezery.
Kdyby na to někdo přišel, byla bych ráda, ale nejde mi vyloženě o obsah kodu, ale nějaké vodítko, kterého bych se mohla chytnout.
elninoslov napsal/a:
Dobre teda, ako myslíte. Ale nemôžete čakať, že budeme hádať a dotazovať sa vylučovacou metódou na to čo chcete, kde čo a prečo máte, a či je to vhodné riešenie toho čo chcete. Koľko by Vám asi trvalo z Vašeho firemného súboru urobiť súbor rovnako vyzerajúci, ale s vymyslenými hodnotami "123456" a "bla bla bla" ? A potom si skúste tipnúť, koľko času asi nám bude trvať, kým si správne tipneme tie isté veci.
Napíšte presne adresy všetkých buniek, v ktorých sa nachádzajú informácie o číslach príloh. Určite sú to bunky B96, B144, B191, B238 ?
Oblasti príloh sú A96:I143, A144:I187, A191:I232 (pri voľbe 4 má byť iná ? A191:I234), A238:I282 (pri voľbe 4 má byť iná ? A238:I283) ?
Požadujete poprehadzované poradie ? Teda napr. najskôr A96:I143, potom A238:I283, a až potom napr. A144:I187 ?
Počet strán na každú z príloh je rovnaký ? Teda napr. čo príloha to 1 strana ? Máte tam zlomy strán ?
Vždy sa jedná o presne rovnaké rozloženie tej prvej časti aj príloh ? Teda nemení sa počet riadkov (to asi nie) a ani výška riadkov ?
Medzi niektorými prílohami sú medzery ?
...
Eninoslo: Blbé je, že nemůžu vložit zdrojový soubor, z pracovních důvodů. Jde o to, že mám 4 přílohy, které v různém pořadí vybírám v jednom sloupci ze seznamu. K nim se přiřadí číslo přílohy dle toho, v jakém pořádí je přiložíte, a chci vytisknout do pdf pouze ty přílohy, které mají číslo, ty které nejsou vybrány a nemají číslo, nechci tisknout, spolu s prvníma dvěma stranama, ty chci tisknout vždy.
JoKe: Myslím, si, že je problém v posledních třech řádcích, protože c první částí at udělám co udělám, stále to nedělá to co chci. Takže problém podle mě bude s tím Slection. Těžko ale říct.
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