Jak dostat CTRL-Z do makra v Excelu
Potřeboval bych do makra zaznamenaného přes volbu Záznam nového makra dostat příkaz VB pro funkci krok zpět (CTRL-Z). Funkce záznam makra to do vytvořeného makra nevloží.
Díky předem.
Potřeboval bych do makra zaznamenaného přes volbu Záznam nového makra dostat příkaz VB pro funkci krok zpět (CTRL-Z). Funkce záznam makra to do vytvořeného makra nevloží.
Díky předem.
Předmět | Autor | Datum |
---|---|---|
máš 2 možnosti:
1. použiješ příkaz VBA na předání klávesových úhozů SendKeys (podle mě ne moc vhodné… touchwood 29.01.2007 08:47 |
touchwood | |
Díky, bohužel jsem zjistil, že to nejde použít resp. nevím jak na to.
Potřebuju vybrat zadanou obla… yorg 29.01.2007 11:54 |
yorg | |
Tak budeš muset zvolit jinou metodiku, tohle je jak drbání levou rukou za pravým uchem.
Třeba vybra… host 29.01.2007 11:58 |
host | |
Chyba, omlouvám se. Zkusil jsem to odkrokovat.
Zjistil jsem, že Selection.Interior.ColorIndex = xlN… yorg 29.01.2007 12:08 |
yorg | |
k "Třeba vybrat oblast, zkopirovat do nového listu, tam zrušit barevné zvýraznění, vytisknout jako v… yorg 29.01.2007 12:09 |
yorg | |
Tak ještě jinak....
Zkopírovat aktuální list do nového listu, pak teprve vybrat oblast, tam zrušit… host 29.01.2007 13:35 |
host | |
taky lze.
Díky poslední yorg 29.01.2007 14:37 |
yorg |
Zpět do poradny Odpovědět na původní otázku Nahoru
máš 2 možnosti:
1. použiješ příkaz VBA na předání klávesových úhozů SendKeys (podle mě ne moc vhodné, tohle používám až v nouzi nejvyšší)
2. použiješ metodu UndoAction
Pro bližší informace použij nápovědu VBA, jsou tam i ukázky kódu
Díky, bohužel jsem zjistil, že to nejde použít resp. nevím jak na to.
Potřebuju vybrat zadanou oblast listu, zrušit v ní barevné zvýraznění buněk (barva stínování), tu oblast vytisknout jako výběr a pak se vrátit k původním údajům s barevným zvýrazněním buněk.
Bohužel jsem zjistil, že tiskem se mi uloží stav, který je vytištěn (tedy bez zvýraznění) a Undo se vyprázdní a není už dostupné.
Tak budeš muset zvolit jinou metodiku, tohle je jak drbání levou rukou za pravým uchem.
Třeba vybrat oblast, zkopirovat do nového listu, tam zrušit barevné zvýraznění, vytisknout jako výběr, zrušit list.
Chyba, omlouvám se. Zkusil jsem to odkrokovat.
Zjistil jsem, že Selection.Interior.ColorIndex = xlNone nevytvoří možnost kroku zpátky. Krok zpět není po této funkci aktivní.
Range("A1:L21").Select
Range("L21").Activate
Selection.Interior.ColorIndex = xlNone
ActiveWindow.UndoAction
k "Třeba vybrat oblast, zkopirovat do nového listu, tam zrušit barevné zvýraznění, vytisknout jako výběr, zrušit list."
tady by šel použít tag Cite (host)
Bohužel tudy cesta taky nevede.
I když dám nejdříve pouze zkopírovat hodnoty a pak formátování, tak formátování nepřenese šířku a výšku buněk.
Takže to vzdávám.
edit:
pobavím se ještě sám se sebou.
Dobrá byla zmínka "Tak budeš muset zvolit jinou metodiku"
Po tisku jsem tam ty barvy znovu nasázel. Takže Pat a Mat by řekli "A je to".
Díky.
Tak ještě jinak....
Zkopírovat aktuální list do nového listu, pak teprve vybrat oblast, tam zrušit barevné zvýraznění, vytisknout jako výběr, zrušit list.
taky lze.
Díky