Makro Excel - barevné zvýraznění výpisu z makra

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Rosta_Kolmix
nováček
Příspěvky: 8
Registrován: srpen 17
Pohlaví: Muž
Stav:
Offline

Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod Rosta_Kolmix » 22 lis 2017 13:42

Dobrý den,

Prosím o pomoc. Mám zde jedním z Vás napsané makro (z programu "Ubytovna" vypisujícího přes sebe údaje z více listů/sešitů) a potřeboval bych, aby se obsah "proměnné" LST z níže uvedeného řádku kódu, včetně té vypisované dvojtečky, vypsal do buňky nějak zvýrazněně - třeba tučně a/nebo v jiné barvě. Lze toho nějak jednoduše docílit?

If Not IsEmpty(D(y, x)) Then Vysledok(y, x) = Vysledok(y, x) & IIf(Vysledok(y, x) = "", "", vbLf) & LST & ": " & D(y, x)

Děkuji Vám!

Reklama
Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 366
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod elninoslov » 22 lis 2017 19:24

To ako fakt, že uvediete len jeden riadok kódu z makra? Mimochodom som to písal ja, a je to robené ako pole, teda tam formátovanie nieje možné. Formátovanie jednotlivých buniek po jednej je veľmi pomalé. Navyše predpokladám, že chcete aby sa každá zhodná hodnota obsiahnutá hocikde vyfarbila inou farbou, čo je tak pomalé, a nesúce komplikácie, že to môžem označiť za nezmysel, pretože v jednej bunke by bolo X farieb. Uveďte aspoň súbor, čo som Vám vtedy poslal, alebo odkaz na tému, kde ste písal, čo ste vtedy potreboval, lebo toto bude vyžadovať úplne iné makro postavené na úplne inom princípe (a rýchlosti).

Rosta_Kolmix
nováček
Příspěvky: 8
Registrován: srpen 17
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod Rosta_Kolmix » 22 lis 2017 21:29

elninoslov - To jsem právě chtěl (dát sem odkaz na původní diskuzi), ale nedaří se mi ji dohledat :oops:
Více barviček nepotřebuji, jen jsem chtěl nějak barevně odlišit "nadpisy" od "obsahu"...
Případně Vám můžu celý ten skript poslat do mailu(?).

Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 366
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod elninoslov » 23 lis 2017 00:16

Ja ten kód mám. Aspoň teda verziu z 8.8.2017, či bola aj nejaká novšia neviem, a je to jedno. Lebo je to proste pole dát, zapisované naraz, teda bez formátu. Normálne manuálne vyfarbite jeden výsledný list ako má vyzerať, a pošlite mi ho. Pozriem na to. Teraz ma napadlo či to nemyslíte náhodou tak, že budú názvy pre dvojbodkou všetky napr. modré a tie hodiny čierne ???
HALAK, a.s. : 6 - 15
ČKD KH : 6 - 15
hokus : 6 - 15
pokus : 6 - 15
Teda by to bolo všade rovnaké ? Ak je to tak, tak zajtra urobím pokus, ako to bude s rýchlosťou.

Inak jedná sa o túto tému:

Kód: Vybrat vše

http://wall.cz/index.php?m=topic&id=37188

Rosta_Kolmix
nováček
Příspěvky: 8
Registrován: srpen 17
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod Rosta_Kolmix » 23 lis 2017 13:39

Ano, PŘESNĚ tak jsem to myslel! Proto jsem si říkal, že by mělo stačit udělat opravu jen v tom vypsaném řádku, jak jsem na to zvyklý z PHP a HTML, kterými se standardně zabývám. Ale je možné, že to v tom Excelu takto nejde...

Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 366
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod elninoslov » 24 lis 2017 00:33

Tak potom vyskúšajte túto úpravu.
Přílohy
Prienik.xlsm
(27.2 KiB) Staženo 43 x

Rosta_Kolmix
nováček
Příspěvky: 8
Registrován: srpen 17
Pohlaví: Muž
Stav:
Offline

Re: Makro Excel - barevné zvýraznění výpisu z makra

Příspěvekod Rosta_Kolmix » 24 lis 2017 21:15

Hůůůstýýýý, DĚKUJI MOC!!!


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    262
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • Makro pro myš Rapture Python
    od mmmartin » 27 srp 2023 15:18 » v Problémy s hardwarem
    9
    1111
    od mmmartin Zobrazit poslední příspěvek
    29 srp 2023 16:47
  • Excel a OneDrive
    od sginfo » 11 zář 2023 15:28 » v Kancelářské balíky
    16
    5988
    od mirekol Zobrazit poslední příspěvek
    20 říj 2023 08:31
  • Excel - funkce když
    od Martyn20 » 13 črc 2023 11:56 » v Kancelářské balíky
    5
    2320
    od mmmartin Zobrazit poslední příspěvek
    13 črc 2023 18:44
  • Excel - vlastní formát Příloha(y)
    od Story-Long » 11 srp 2023 14:50 » v Kancelářské balíky
    3
    1839
    od Story-Long Zobrazit poslední příspěvek
    14 srp 2023 10:11

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 5 hostů