< návrat zpět

MS Excel


Téma: Barevné zvýraznění aktivního tlačítka pro makro rss

Zaslal/a 16.11.2022 9:04

PavelJanecZdravím, potřeboval bych prosím poradit, jestli lze nějak barevně odlišit právě použité makro, spuštěné ovládacím prvkem (klasické tlačítko). Mám jich v listu několik, ale potřebuju vidět, které je právě aktivní. Děkuji za radu.

Zaslat odpověď >

Strana:  1 2 3 4   další »
#053874
PavelJanec
Nikdo netušíte? Já to zkoušel tak, že jsem upravil zaznamenal nové makro konkrétního tlačítka s tím, že jsem mu zároveň upravil barvu textu a u dalšího tlačítka jsem postupoval stejně s tím, že tu předchozí barvu jsem odstanil. Po zmáčknutí se tedy písmo změní, ale nahlásí mi to chybu .TintAndShade = 0. Když nastavím -1, nebo 1, je to stejné. Tak nevím.citovat
#053877
elninoslov
Ale tušíme, len sa nám nechce vymenovávať všetko aj s príkladmi. Tu je jeden. Ďalší by mohol byť tak, že tlačítko bude menšie ako bunka, každé makro zapíše do nejakej nepodstatnej/skrytej bunky hodnotu, na základe ktorej podmienené formátovanie zvýrazní bunku pod tlačítkom. Ďlaej, ak je tlačítkami volané obdobné makro, len s iným parametrom, dá sa urobiť jedno makro, ktoré bude identifikovať na základe Application.Caller, ktoré tlačítko je stlačené - teda nie tak ako je v tomto príklade. Ale to záleží na tom, čo tie makrá robia. A sme zase tam kde pred pár dňami v inej téme 1 Ďalšou možnosťou je použiť ActiveX tlačítka, kde je možnosť zmeny pozadia. Prípadne použiť namiesto tlačítka Shape objekt...
Priložte prílohu. Reálnu a anonymizovanú.
Příloha: zip53877_oznac-farbou-tlacitko.zip (16kB, staženo 6x)
citovat
#053881
PavelJanec
Děkuji za ochotu Elnino, já se marně snažím pochopit ten princip. Ten tvůj vzor je v pořádku, ale zkus mi to prosím opravit tak, aby například první označilo buňku ve slouci AR, řádek 10. Díky, snad si z toho něco vezmu.citovat
#053883
elninoslov
Ďalších niekoľko príkladov. To sa dá nakombinovať, rôzne možnosti, presne podľa toho čo makrá robia (nevieme), koľko je tlačítok (nevieme), ako sú rozmiestnené (nevieme), stály/dynamický počet (nevieme), ich názvy (nevieme), podmienený formát, zápis pod tlačítko, zápis do spoločnej bunky, počítanie na základe riadku, ...
Příloha: zip53883_oznac-farbou-tlacitko2.zip (32kB, staženo 5x)
citovat
#053884
PavelJanec
To co potřebuji, není určitě nic složitého, jen nevím, jak na to. V příloze posílám vzor. Jedná se o to, aby konkrétní tlačítko odkázalo na konkrétní sloupec, abych v tom sloupci mohl editovat a neposouval to ručně, zároveň, aby zůstalo to tlačítko označené (viz můj první dotaz), abych v tom měl přehled. Asi by mi vyhovovalo to červené písmo, než pozadí buňky. No a poslední věc bude tlačítko RESET. To je pro případ, že budu mít například zafiltrováno. U Resetu potřebuji, aby vše odfiltroval a seřadil abecedně podle sloupce TV a posunul obsah na poslední záznam v řádku ve sloupci A. To je vlastně všechno. Snad jsem to napsal dobře pro pochopení. Moc děkuji za ochotu.
Příloha: 7z53884_vzor.7z (45kB, staženo 6x)
citovat
#053886
elninoslov
Tak toto by som urobil inak. Predpokladám, že v reále namiesto Buňka 1, Buňka 2, ... sú tam nejaké texty. Tak by som to urobil jedným jediným makrom, ktoré by si našlo v 12. riadku správnu pozíciu podľa nápisu na stlačenom tlačítku. Toto uvádzam len jednu z možností. Kľudne sa to dá urobiť na dynamický počet tlačítok, dynamický počet stĺpcov a pod.
Příloha: zip53886_oznac-tlacitko-3.zip (37kB, staženo 10x)
citovat
#053887
PavelJanec
Elnino, je to naprosto perfektní. O to více, že to lze editovat na základě textu. Jen mi ještě řekni, jak mám postupovat, když chci přidat další tlačítko? Zkoušel jsem do těch dvou řad přidat btn9, viz:
With .Buttons(Array("btn1", "btn2", "btn3", "btn4", "btn5", "btn6", "btn7", "btn8", "btn9")).Font
ale nic to nedělá, jen hází chybu. Já ten princip asi nikdy nepochopím. A to tlačítko RESET by mělo skončit na posledním vyplněném řádku ve sloupci A, ale musím sjet dolů, nešlo by to, aby se to zobrazilo nahoře. Děkuji ještě jednou!citovat
#053888
PavelJanec
Už jsem na to přišel. Díky Elninocitovat
#053889
PavelJanec
Tak beru opět zpět. Když zkopíruju tlačítko a vložím vedle, přepíšu text, nefunguje. Když vytvořím nové a nastavím makro a upravím název kam má směřovat, funguje, ale nezmění barvu. Tak teď už vážně nevím.citovat
#053890
elninoslov
Ak chcete pridať tlačítko, musíte mu nastaviť meno. Karta "Domov" - vpravo "Nájsť a vybrať" - "Tabla výberu". Tam som ich pomenoval "btn1", "btn2", ... aby sa dali v makre jednoducho identifikovať. Ak chcete meniť počet tlačítok, dá sa to urobiť aj tak, že iba nove tlačítko pomenujete tak, aby boli všetky tlačítka o ktoré sa jedná, rovnako pomenované, a makro si ich nájde samé, keď budú spĺňať nejakú podmienku, napr. názov začína na "btn". Chápeme sa?

To zaskrolovanie+označenie poslednej bunky v A sa dá urobiť aj tak, že sa zistí viditeľná oblasť listu (pretože môže byť okno rôznej veľkosti, zoomu apod), a zaskroluje sa tak, aby bola tá označená bunka na spodku viditeľnej časti. Lebo teraz je na vrchu, a tie bunky nad ňou nevidno. Teraz som to dal tak, aby ostalo viditeľných 5 buniek nad ňou.

Keďže sa tie názvy používajú na 2 miestach, tak som urobil na začiatku konštantu, a stačí zmeniť iba tú jednu.

Odstránil som tie komentáre, čo ste tam mali, lebo mi to stále písalo, že súbor obsahuje nejaké problémy. Už je to OK. Tak si ich prípadne doplňte.

Dajte vedieť o tej prípadnej zmene tlačítok a počtu stĺpcov na dynamické...
Příloha: zip53890_oznac-tlacitko-4.zip (36kB, staženo 11x)
citovat

Strana:  1 2 3 4   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje