Jsou zobrazeny jen nové odpovědi. Zobrazit všechny
Předmět Autor Datum
Vytvoř si makro, kam nasázíš buňky a požadovanou barvu. Barvu přitom můžeš zadat třemi různými způso…
Machr55 23.01.2017 12:14
Machr55
a teraz keď tak pozerám na príspevok Machra55 (pochopil som ho, že by si musel pre každú bunku zapís…
robert13 23.01.2017 14:05
robert13
Chápeme sa? :-D
robert13 23.01.2017 14:09
robert13
Tak se s tím peru a něco nefunguje. Převést seznam není problém. Ale když otevřu tvé makro a do záv…
Květy 23.01.2017 21:01
Květy
Nemôžeš len tak zalomiť riadky Enterom. Pokiaľ chceš pokračovať v dlhom zápise jedného príkazu na ďa…
robert13 23.01.2017 21:25
robert13
Nedávám Enter, jen vložím celý ten seznam a samo se to rozdělí na řádky. Když teď chci dát na konci…
Květy 23.01.2017 21:27
Květy
Práveže Enter musíš dať, aby mohli byť riadky rozdelené do viacerých. Nemôže to byť vo viacerých ria…
robert13 23.01.2017 21:39
robert13
Skvěle, už to funguje. Máš pravdu, nebylo místo na ty dva znaky. Takže první zkušenost s makry a je…
Květy 23.01.2017 21:48
Květy
Seš machr! ;-)
robert13 23.01.2017 21:51
robert13
Bez Velemachra jako Ty, by nebyl pidimachr jako já ;)
Květy 23.01.2017 21:52
Květy
Díky, ale tys to nevzdal a nakonec zvládl. Brou noc!;-):beer: poslední
robert13 23.01.2017 21:54
robert13

Vytvoř si makro, kam nasázíš buňky a požadovanou barvu. Barvu přitom můžeš zadat třemi různými způsoby. Příklad takového makra:

Sub Makro1()
  Range("B2").Interior.Color = RGB(80, 120, 80)  ' Barva zadaná jako RGB
  Range("B3").Interior.Color = vbGreen           ' Barva zadaná konstantou
  Range("B4").Interior.ColorIndex = 3            ' Barva zadaná indexem
End Sub

Místo B2, B3, B4 si nasázej svoje adresy. O zadání barev těmi třemi způsoby se více dozvíš třeba zde.

a teraz keď tak pozerám na príspevok Machra55 (pochopil som ho, že by si musel pre každú bunku zapísať riadok kódu), tak sa to dá aj takto (čím sa Machrovi ospravedlňujem):

Sub Makro1()
    Range("B2,E8,H4,H10,F17,C15,C10,C20").Interior.ColorIndex = 3
End Sub

pričom v zátvorke je zoznam adries. Toto nahrádza moje prvé makro (v Zošit1.xlsm).

Záleží teda od toho, ako to máš vo Worde. Pokiaľ tam máš zoznam za sebou oddelený čiarkami, tak to je práve to, čo potrebuješ do tohto makra.
Pokiaľ to máš pod sebou, tak môžeš použiť môj "výrobník" poľa, pričom z neho odstránime úvodzovky (druhé tlačidlo)

Práveže Enter musíš dať, aby mohli byť riadky rozdelené do viacerých. Nemôže to byť vo viacerých riadkoch bez rozdeľovačov (medzera, podtržník a Enter). Porozdeľuj si to do riadkov po nejakých rozumných dávkach, aby si videl vždy aj konce riadkov. V mieste, kde ti to rozdelí samotný editor, už nemáš miesto - nedovolí na koniec riadka ešte vložiť tú nutnú medzeru a podtržítko (na konci každého čiastkového riadka, ktorý má pokračovať)!
Ak by to nešlo, urob to po blokoch, trebárs 5x. Neviem, či na dľžku (počet prvkov) existuje obmedzenie. Sám by som si to odskúšal trebárs polovicou alebo štvrtinou adries...

Zpět do poradny Odpovědět na původní otázku Nahoru