xlnc napsal/a:
Je to tady prdel :-D
Je to technicky nemožné? Makro sa nespusti v zošite kvôli exportu a importu? Chcela som pomôcť kolegyni a uľahčiť jej tak prácu.citovat
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Kopírovanie textu do neprázdnej bunky
Je to technicky nemožné? Makro sa nespusti v zošite kvôli exportu a importu? Chcela som pomôcť kolegyni a uľahčiť jej tak prácu.citovat
máte pravdu, keby som to uviedla kompletne na začiatku, tak by som sa vyhla nedorozumeniam...
polepším sa...citovat
Moja chyba. Mali ste pravdu neuložila som to do "osobní zošit maker", ale "tento zošit". Výborne, ďakujem, už to funguje.citovat
Ďakujem veľmi pekne za trpezlivosť.citovat
MS Excel
Téma: Kopírovanie textu do neprázdnej bunky 
Zaslal/a kabaka 16.5.2017 10:22
Kopírovanie textu do neprázdnej bunky nie je problém. Problém nastáva pri bunke, kde je text.
Neviem dopredu koľko riadkov bude mať výsledná tabuľka.
DOPLNENIE - VYRIEŠENÉ
Potrebujem aby celý stĺpec O obsahoval text - Začiatok hod., Koniec hod.. Aj v prázdnej bunke bez textu, v bunke, kde už nejaký text je. Napr. dodatok, preklad, služba, príslužba. Tabuľka obsahuje hlavičku.(prvé dva riadky Posledný stĺpec O sa volá Poznámka
DOPLNENIE-VYRIEŠENÉ
Mám ešte jeden problém. Ako uchovať makro? (excel 2003)
Vložila som ho ako šablónu tak (do XLSTART), aby bolo aktívne v každom zošite, ktorý sa otvorí. To je v poriadku.
Neuchová sa však pri exporte a importe.
Tento súbor je totiž exportovaný z intranetu ako textový dokument a následne importovaný do excelu.
DOPLNENE
Moja chyba - makro som neuložila do "zošitu osobních maker"
Příloha: 
36348_makro.xls (18kB, staženo 32x)
36348_makro.xls (18kB, staženo 32x)Je to technicky nemožné? Makro sa nespusti v zošite kvôli exportu a importu? Chcela som pomôcť kolegyni a uľahčiť jej tak prácu.citovat
(16.5.2017 15:17)#036368
Já vím jedno - že vaše poloviční zadání a přídavky komplikují práci místním a já to rozhodně luštit nebudu. Miluju "ještě, akorát, šlo by". To je o úctě k sobě samému.citovat
Je to možné, pretože mne to funguje. Podľa mňa nemáte korektne uložené makro v Personal.xlsb.
Otvorte si Poznámkový blok, skopčite si tam kód makra. Zatvorte všetky zošity. Vytvorte jeden nový čistý. Dajte nahrať makro, kde v okne napíšte názov makra napr. "VlozText", klávesovú skratku "m" (to bude potom Ctrl+Shift+M), prípadný nejaký krátky popis, ale hlavne nastavte uložiť do "Zošit osobných makier". Zastavte záznamník makra. Vo VBA vložte telo kódu z poznámkového bloku do nahraného makra vo VBA. Vo VBA stlačte Uložiť. Zatvorte Excel, bude sa pýtať na uloženie nového súboru napr. Zošit1, dajte nie. Ak sa opýta na uloženie Zošitu osobných makier, dajte áno. Zatvorte Excel. Naštartujte ho, a hneď si to vo VBA skontrolujte či tam máte Personal.xlsb aj s makrom. Musí tam byť. Teraz som to robil.
Prípadne si
Worksheets("makro")
zmente na
ActiveSheetcitovat
Otvorte si Poznámkový blok, skopčite si tam kód makra. Zatvorte všetky zošity. Vytvorte jeden nový čistý. Dajte nahrať makro, kde v okne napíšte názov makra napr. "VlozText", klávesovú skratku "m" (to bude potom Ctrl+Shift+M), prípadný nejaký krátky popis, ale hlavne nastavte uložiť do "Zošit osobných makier". Zastavte záznamník makra. Vo VBA vložte telo kódu z poznámkového bloku do nahraného makra vo VBA. Vo VBA stlačte Uložiť. Zatvorte Excel, bude sa pýtať na uloženie nového súboru napr. Zošit1, dajte nie. Ak sa opýta na uloženie Zošitu osobných makier, dajte áno. Zatvorte Excel. Naštartujte ho, a hneď si to vo VBA skontrolujte či tam máte Personal.xlsb aj s makrom. Musí tam byť. Teraz som to robil.
Prípadne si
Worksheets("makro")
zmente na
ActiveSheetcitovat
xlnc napsal/a:
Já vím jedno - že vaše poloviční zadání a přídavky komplikují práci místním a já to rozhodně luštit nebudu. Miluju "ještě, akorát, šlo by". To je o úctě k sobě samému.
máte pravdu, keby som to uviedla kompletne na začiatku, tak by som sa vyhla nedorozumeniam...
polepším sa...citovat
elninoslov napsal/a:
Je to možné, pretože mne to funguje.
Moja chyba. Mali ste pravdu neuložila som to do "osobní zošit maker", ale "tento zošit". Výborne, ďakujem, už to funguje.citovat
Ospravedlňujem sa, zabudla som na 2 podstatné veci a to,
že v bunke, ktorá obsahuje slovo služba a príslužba už čas je napísaný, preto potrebujem tieto bunky vynechať (nevkladať Začiatok hod. Koniec hod.) Rovnako nevkladať ani do bunky, ktorá obsahuje poznámku neop.
Ďakujem.
nový súbor
že v bunke, ktorá obsahuje slovo služba a príslužba už čas je napísaný, preto potrebujem tieto bunky vynechať (nevkladať Začiatok hod. Koniec hod.) Rovnako nevkladať ani do bunky, ktorá obsahuje poznámku neop.
Ďakujem.
nový súbor
Příloha: 36419_36419_vloztext.xls (39kB, staženo 26x)
citovat36419_36419_vloztext.xls (39kB, staženo 26x)xlnc by to, čo vymýšľate, nazval "bejkárny". A správne. Prerobil som to, zatiaľ bez CLEAN (lebo ničí aj CHR(10), ale to by sa dalo vybaviť dočasným nahradením...), ale :
-nieje mysliteľné, aby makro prechádzalo každé jedno písmenko, zisťovalo si o ňom všemožné formátovanie (font, veľkosť, rez, farba, index, ...)
-potom prečistilo nadbytočné medzery, s tým, že bude po každom výmaze prepočítavať a prepisovať formáty všetkých písmeniek po jednom, aby boli tak ako predtým výmazom nadbytočnej medzery
-až potom skontrolovalo podmienky vkladania textu Zač/Kon
-a následne zopakovalo cirkus s premiestňovaním formátov každého písmenka
S toho vyplýva toto moje riešenie, ktoré nepočíta so žiadnym iným formátom textu, iba podľa presne daných pravidiel. Teda tie kľúčové slová "služba", "príslužba", "dodatok", "neop.", "Začiatok hod." & Chr(10) & "Koniec hod." sa zafarbia, a ak bolo iné zafarbenie podľa ľubovôle kolegyne, tak sa zruší.
-nieje mysliteľné, aby makro prechádzalo každé jedno písmenko, zisťovalo si o ňom všemožné formátovanie (font, veľkosť, rez, farba, index, ...)
-potom prečistilo nadbytočné medzery, s tým, že bude po každom výmaze prepočítavať a prepisovať formáty všetkých písmeniek po jednom, aby boli tak ako predtým výmazom nadbytočnej medzery
-až potom skontrolovalo podmienky vkladania textu Zač/Kon
-a následne zopakovalo cirkus s premiestňovaním formátov každého písmenka
S toho vyplýva toto moje riešenie, ktoré nepočíta so žiadnym iným formátom textu, iba podľa presne daných pravidiel. Teda tie kľúčové slová "služba", "príslužba", "dodatok", "neop.", "Začiatok hod." & Chr(10) & "Koniec hod." sa zafarbia, a ak bolo iné zafarbenie podľa ľubovôle kolegyne, tak sa zruší.
Příloha: 36426_36419_36419_vloztext.xls (60kB, staženo 23x)
citovat36426_36419_36419_vloztext.xls (60kB, staženo 23x)elninoslov napsal/a:
xlnc by to, čo vymýšľate, nazval "bejkárny". A správne.
Ďakujem veľmi pekne za trpezlivosť.citovat
Mohla by som ešte poprosiť o úpravu makra?
Zistila som, že by som mohla kolegyni ešte viac pomôcť.
Úprava makra:
skryť stĺpce GažM
nastaviť výšku riadka na 30
Na základe poznámky (dodatok, služba,príslužba, neop.)
celý riadok v rozsahu A:N vyfarbiť
preklad sivé podfrarbenie (iba bunky)
oddeliť skupinu rovnakých sál
Stĺpec B - COS_1, COS_2) tučným orámovaním
a nakoniec vložiť text Začiatok hod. a Koniec hod.
skúsila som si nahrať makro, ale nefunguje mi to tak ako by som chcela
Zistila som, že by som mohla kolegyni ešte viac pomôcť.
Úprava makra:
skryť stĺpce GažM
nastaviť výšku riadka na 30
Na základe poznámky (dodatok, služba,príslužba, neop.)
celý riadok v rozsahu A:N vyfarbiť
preklad sivé podfrarbenie (iba bunky)
oddeliť skupinu rovnakých sál
Stĺpec B - COS_1, COS_2) tučným orámovaním
a nakoniec vložiť text Začiatok hod. a Koniec hod.
skúsila som si nahrať makro, ale nefunguje mi to tak ako by som chcela
Příloha: 36496_makro-uprava.xls (72kB, staženo 26x)
citovat36496_makro-uprava.xls (72kB, staženo 26x)? Len keď nastavíte výšku na 30, tak sa Vám nevojde aj ten text aj Zac+Kon.
Příloha: 36543_36505_makro-uprava.xls (105kB, staženo 27x)
citovat36543_36505_makro-uprava.xls (105kB, staženo 27x)Uživatelské menu
Nejste přihlášen(a)
\n
\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